--- /dev/null
+# Original bug : cts21616
+# Date : 04 Nov 98
+
+restore cts21616_base.rle base
+restore cts21616_face.rle cont
+
+# Funtil in Shape -> failure
+explode base face
+copy base_20 funtil
+
+# no Gluer
+featprism base cont cont 0 -1 0 0 1
+featperform prism result funtil
+
+set square 42861.7