tests/feat/featrevol/I6

   1 box b 8 8 8
   2 ttranslate b -4 0 0
   3 pcylinder c1 2 8
   4 bfuse c b c1
   5 profile p x 1 y 1 x -1 y -1
   6 trotate p 0 0 0 1 0 0 90
   7 trotate p 0 0 0 0 0 1 90
   8 ttranslate p 0 -3 0.5
   9 explode c f
  10 explode p e
  11
  12 featrevol c p p 0 0 0.5 0 0 1 1 1
  13 addslide revol p_2 c_3
  14 featperform revol result c_2 c_5
  15
  16
  17 set square 431.681