tests/bugs/moddata_3/bug25202_3

   1 puts "========"
   2 puts "CR25202"
   3 puts "========"
   4 puts ""
   5 #########################################
   6 ## Incorrect value of IsClosed flag in shapes produced by some algorithms
   7 #########################################
   8
   9 plane pp 0 0 0 0 0 1
  10 trim pp pp 0 100 0 100
  11 mkface ff pp
  12 prism result ff 0 0 20
  13
  14 set info [whatis result]
  15 if { [regexp {Closed} ${info}] } {
  16     puts "OK : value of IsClosed flag is correct"
  17 } else {
  18     puts "Error : value of IsClosed flag is not correct"
  19 }
  20
  21 set 2dviewer 1