#pcylinder s1 5 12 
#pcylinder s2 3 15 
#trotate s2 0 0 0 1 0 0 90
#ttranslate s2 0 7 7
#fuse s3 s1 s2
#pcylinder s4 3 20 
#fuse s s4 s3

restore [locate_data_file CFI_6_i56fhi.rle] s
tscale s 0 0 0 SCALE2
explode s E
mkevol result s
updatevol s_6 0 1*SCALE2 1 3*SCALE2 2 2*SCALE2
buildevol

set square 766.318
