tests/pipe/standard/E9

   1 bsplinecurve profile 2 3 0 3 1 1 2 3 0 30 -21 5 -30 -30 24  5 30 -30 24 5 0 30 -21 5
   2 mkedge profile profile
   3 wire profile profile
   4 mkplane profile profile
   5 beziercurve w 7 0 0 0 0 2000 50 0 1700 700 0 400 300 0 0 0 0 900 400 0 140 100
   6 mkedge w w
   7 wire w w
   8 pipe result w profile
   9
  10 set square 309430