pcylinder c1 2 5
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 -2 0.5
explode c1 f

featrevol c1 p p 0 0 0.5 0 0 1 0 1
featperformval revol result 30


set square 91.0118
