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

puts "TODO OCC22817 All:Faulty shapes in variables faulty_1 to faulty_2"
#box b -15 -15 -15 15 30 30
#beziercurve w 4 0 0 0 10 0 0 10 10 0 20 10 0
#mkedge w w
#wire w w
#circle profile 0 0 0 1 0 0 10
#mkedge profile profile
#wire profile profile
#mkplane profile profile
#pipe p w profile
#explode b F
#explode p F
#glue r p b p_2 b_2
#pcylinder c 6 10
#ttranslate c -7.5 0 15
#explode c F
#explode r F
#glue s c r c_3 s_6 

restore [locate_data_file 6_G56.draw] s
tscale s 0 0 0 SCALE2
fsameparameter s
explode  s E
mkevol result s
updatevol s_12 0 6*SCALE2 1 8*SCALE2 2 6*SCALE2
buildevol
 
checkprops result -s 5343.69
Commit	Line	Data
40093367	1	puts "TODO OCC22817 All:Faulty shapes in variables faulty_1 to faulty_2"
	2	#box b -15 -15 -15 15 30 30
	3	#beziercurve w 4 0 0 0 10 0 0 10 10 0 20 10 0
	4	#mkedge w w
	5	#wire w w
	6	#circle profile 0 0 0 1 0 0 10
	7	#mkedge profile profile
	8	#wire profile profile
	9	#mkplane profile profile
	10	#pipe p w profile
	11	#explode b F
	12	#explode p F
	13	#glue r p b p_2 b_2
	14	#pcylinder c 6 10
	15	#ttranslate c -7.5 0 15
	16	#explode c F
	17	#explode r F
	18	#glue s c r c_3 s_6
	19
8418c617	20	restore [locate_data_file 6_G56.draw] s
40093367	21	tscale s 0 0 0 SCALE2
	22	fsameparameter s
	23	explode s E
	24	mkevol result s
	25	updatevol s_12 0 6SCALE2 1 8SCALE2 2 6*SCALE2
	26	buildevol
	27
58cf74e0	28	checkprops result -s 5343.69