tests/pipe/standard/F3

   1 beziercurve profile 6 0 -105 75.5 -5 -115 75.5 -5 -135 75.5 5 -135 75.5 5 -115 75.5 0 -105 75.5
   2 mkedge profile profile
   3 wire profile profile
   4 mkplane profile profile
   5 hyperbola w 0 0 -50 1 0 0 50 50
   6 mkedge w w -pi/2. pi/2.
   7 wire w w
   8 pipe result w profile
   9
  10 set square 9533.54