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

#pcone c 25 50 50
#ttranslate c 0 0 50
#prism p c_3 0 25 -50
#explode c f
#explode p F
#glue s c p c_3 p_2

restore [locate_data_file 7_A4.draw] s
tscale  s 0 0 0 SCALE1 
explode s e
blend result s 15*SCALE1 s_2
explode result So
tcopy result_1 result 
explode result V

set square 781868
Commit	Line	Data
40093367	1	#pcone c 25 50 50
	2	#ttranslate c 0 0 50
	3	#prism p c_3 0 25 -50
	4	#explode c f
	5	#explode p F
	6	#glue s c p c_3 p_2
	7
8418c617	8	restore [locate_data_file 7_A4.draw] s
40093367	9	tscale s 0 0 0 SCALE1
	10	explode s e
	11	blend result s 15*SCALE1 s_2
	12	explode result So
	13	tcopy result_1 result
	14	explode result V
	15
	16	set square 781868