tests/feat/featprism/J2

   1 # Original bug : ger50084
   2 # Date : 15 Sept 98
   3
   4 cpulimit 1300
   5 #increased from default by aki 26.08.04
   6
   7 restore [locate_data_file ger50084_baseX.rle] base
   8 fsameparameter base
   9 restore [locate_data_file ger50084_face.rle] wire
  10
  11 ## contour est un wire -> on en fait une face
  12 mkplane cont wire
  13
  14 featprism base cont cont 0 0 1 1 1
  15 featperform prism result base
  16
  17 set square 25327.1