#box b -10 -10 -10 20 20 20
#pcylinder c 8 15
#ttranslate c 0 0 10
#fuse s b c
#save s 6_A1234.draw

restore [locate_data_file CFI_6_a12fgr.rle] s
tscale s 0 0 0 SCALE2
explode s E
blend result s 3*SCALE2 s_5

checkprops result -s 3095.55