#box b -15 -15 -30 30 30 30
#pcone d 13 5 20
#fuse f1 b d
#pcylinder c 10 15
#trotate c 0 0 0 1 0 0 90
#ttranslate c 0 -15 -15
#fuse s f1 c
#donly s
#save s 6_B56.draw

restore [locate_data_file CFI_6_b56fgu.rle] s
tscale s 0 0 0 SCALE2
explode s E
blend result s 8*SCALE2 s_3

set square 7004.23