tests/blend/buildevol/E2

   1 beziercurve w 3 0 0 0 5 10 0 10 15 0
   2 mkedge w w
   3 wire w w
   4 polyline profile 0 0 0  10 0 0  10 0 10  0 0 10  0 0 0
   5 mkplane profile profile
   6 pipe s w profile
   7 tscale s 0 0 0 SCALE1
   8 fsameparameter s SCALE1*1.e-7
   9 explode s E
  10 mkevol result s
  11 updatevol s_5 0 1*SCALE1 1 2*SCALE1 2 1*SCALE1
  12 buildevol
  13
  14 set square 81492.8