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

#box b -15 -15 -15 30 30 15
#pcone c 13 5 20
#fuse s b c

restore 6_B1234.draw s
tscale s 0 0 0 SCALE2
explode s E
mkevol result s
updatevol s_3 0 4*SCALE2 1 8*SCALE2 2 6*SCALE2
buildevol

set square 4242.66
Commit	Line	Data
40093367	1	#box b -15 -15 -15 30 30 15
	2	#pcone c 13 5 20
	3	#fuse s b c
	4
	5	restore 6_B1234.draw s
	6	tscale s 0 0 0 SCALE2
	7	explode s E
	8	mkevol result s
	9	updatevol s_3 0 4SCALE2 1 8SCALE2 2 6*SCALE2
	10	buildevol
	11
	12	set square 4242.66