tests/feat/featprism/B9

   1 restore [locate_data_file cylindre.rle] cyl
   2 restore [locate_data_file contour.rle] cont
   3 mkplane cont cont
   4 nexplode cyl F
   5
   6 featprism cyl cont cont 0 1 0 0 1
   7 featperform prism result
   8
   9 set square 94997.8