[occt.git] / tests / draft / angle / I6

#I6----------------------------------------------
polyline p 0 0 5  0 0 0  20 0 0  20 0 5  
beziercurve bc 4  20 0 5  15 0 6  5 0 4  0 0 5
mkedge bc bc
wire p p bc
mkplane p p
prism p p 0 20 0
profile pf o 12 9 0 p 0 -1 0 1 0 0 l 3 t 0 15 \
t -3 0  
revol pr pf 10 9 0 0 0 1 180
bfuse f p pr
nexplode f f
depouille result f 0 0 1 f_7 1 0 0 15 0 0 1

set square 1482.57
Commit	Line	Data
40093367	1	#I6----------------------------------------------
	2	polyline p 0 0 5 0 0 0 20 0 0 20 0 5
	3	beziercurve bc 4 20 0 5 15 0 6 5 0 4 0 0 5
	4	mkedge bc bc
	5	wire p p bc
	6	mkplane p p
	7	prism p p 0 20 0
	8	profile pf o 12 9 0 p 0 -1 0 1 0 0 l 3 t 0 15 \
	9	t -3 0
	10	revol pr pf 10 9 0 0 0 1 180
	11	bfuse f p pr
	12	nexplode f f
	13	depouille result f 0 0 1 f_7 1 0 0 15 0 0 1
	14
	15	set square 1482.57