[occt.git] / tests / blend / buildevol / E3

beziercurve w 3 0 0 0 5 10 0 10 15 0
mkedge w w
wire w w
polyline profile 0 0 0  10 0 0  10 0 10  0 0 10  0 0 0
mkplane profile profile
pipe s w profile
tscale s 0 0 0 SCALE1
fsameparameter s SCALE1*1.e-7
explode s E
mkevol result s
updatevol s_6 0 1*SCALE1 1 2*SCALE1 2 1*SCALE1
buildevol

set square 81299.7
Commit	Line	Data
40093367	1	beziercurve w 3 0 0 0 5 10 0 10 15 0
	2	mkedge w w
	3	wire w w
	4	polyline profile 0 0 0 10 0 0 10 0 10 0 0 10 0 0 0
	5	mkplane profile profile
	6	pipe s w profile
	7	tscale s 0 0 0 SCALE1
	8	fsameparameter s SCALE1*1.e-7
	9	explode s E
	10	mkevol result s
	11	updatevol s_6 0 1SCALE1 1 2SCALE1 2 1*SCALE1
	12	buildevol
	13
	14	set square 81299.7