[occt.git] / tests / blend / tolblend_buildvol / A2

#box s 0 0 0 100 100 100
#explode s f
#sewing s s_1 s_3

restore [locate_data_file 7_B2.draw] s
tscale  s 0 0 0 SCALE1
explode s E
mkevol P s
updatevol s_1 0 10*SCALE1 1 20*SCALE1 2 0*SCALE1
buildevol
explode P Sh
copy P_1 result

set square 485351
Commit	Line	Data
40093367	1	#box s 0 0 0 100 100 100
	2	#explode s f
	3	#sewing s s_1 s_3
	4
8418c617	5	restore [locate_data_file 7_B2.draw] s
40093367	6	tscale s 0 0 0 SCALE1
	7	explode s E
	8	mkevol P s
	9	updatevol s_1 0 10SCALE1 1 20SCALE1 2 0*SCALE1
	10	buildevol
	11	explode P Sh
	12	copy P_1 result
	13
	14	set square 485351