#old revolrib3
pcylinder c1 2 5
pcylinder c2 1 3
ttranslate c2 0 0 5
bfuse s c1 c2

profile pp x 2 c 1 90 WW
trotate pp 0 0 0 0 1 0 -90
trotate pp 0 0 0 0 0 1 -90
ttranslate pp -2 0 5
nexplode s e

blend s s 0.3 s_2
plane pl -2 0 5 0 1 0

featrf s pp pl 0 0 0 0 0 1 0.2 0.2 1 1
featperform rf result


checkprops result -s 111.509