hyperbola profile 0 35 35 0 1 -1 50 50
mkedge profile profile -pi/2. pi/2.
wire profile profile
ellipse w 0 40 0 1 0 0 100 40
mkedge w w
wire w w
pipe result w profile

checkprops result -s 168406