[occt.git] / tests / blend / tolblend_simple / A3

#polyline d 0 0 0  0 5 0 7 7 -1
#polyline dd -5 0 -5  -5 0 5  5 0 5  5 0 -5 -5 0 -5
#mkplane dd dd
#wire d d
#pipe s d dd
#explode s F 
#donly s_3  s_1 s_2  s_4  
#sewing t  s_3  s_1 s_2  s_4 
#explode t sh
#save t_1 5_B12.draw 

restore [locate_data_file 5_B12.draw] s
tscale s 0 0 0 SCALE1
explode s E 
blend result s 0.5*SCALE1 s_4 0.5*SCALE1 s_8 0.5*SCALE1 s_7 0.5*SCALE1 s_3
explode result sh
tcopy result_1 result

set square 4811.71
Commit	Line	Data
40093367	1	#polyline d 0 0 0 0 5 0 7 7 -1
	2	#polyline dd -5 0 -5 -5 0 5 5 0 5 5 0 -5 -5 0 -5
	3	#mkplane dd dd
	4	#wire d d
	5	#pipe s d dd
	6	#explode s F
	7	#donly s_3 s_1 s_2 s_4
	8	#sewing t s_3 s_1 s_2 s_4
	9	#explode t sh
	10	#save t_1 5_B12.draw
	11
8418c617	12	restore [locate_data_file 5_B12.draw] s
40093367	13	tscale s 0 0 0 SCALE1
	14	explode s E
	15	blend result s 0.5SCALE1 s_4 0.5SCALE1 s_8 0.5SCALE1 s_7 0.5SCALE1 s_3
	16	explode result sh
	17	tcopy result_1 result
	18
	19	set square 4811.71