box b 8 8 8
ttranslate b -4 0 0 
pcylinder c1 2 8
bfuse c b c1
profile p x 1 y 1 x -1 y -1
trotate p 0 0 0 1 0 0 90
trotate p 0 0 0 0 0 1 90
ttranslate p 0 -3 0.5
explode c f
explode p e

featrevol c p p 0 0 0.5 0 0 1 1 1
addslide revol p_2 c_3
featperform revol result c_2 c_5


set square 431.681
