#old revolrib12
pcylinder c1 3 5
pcone c2 2 1.5 3
pcylinder c3 1 2
ttranslate c2 0 0 5
ttranslate c3 0 0 8
bfuse ss c1 c2
bfuse s ss c3
nexplode s e

blend s s 0.3 s_4 0.3 s_2

vertex v1 -1. 0 8.1
vertex v2 -2.1 0 8.1
vertex v3 -2.1 0 4.8
edge e1 v1 v2
edge e2 v2 v3
wire w e1 e2 
plane pl -1. 0 8.1 0 -1 0

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

set square 191.996
