restore [locate_data_file cylindre.rle] cyl
restore [locate_data_file contour.rle] cont
mkplane cont cont
nexplode cyl F

featprism cyl cont cont 0 1 0 0 1
featperform prism result cyl_3 cyl_3

set square 94997.8
