1restore [locate_data_file cylindre.rle] cyl
2restore [locate_data_file contour.rle] cont
3mkplane cont cont
4nexplode cyl F
5
6ttranslate cont 0 0 -100
7featprism cyl cont cont 0 1 0 1 1
8featperformval prism result 100
9
10checkprops result -s 101561
11