tests/bugs/moddata/bug366

   1
   2 puts "========================"
   3 puts " OCC366 "
   4 puts "========================"
   5 puts ""
   6 ##################################################
   7 ## Checkshape says that face is valid but it inludes selfintersecting wire
   8 ##################################################
   9
  10 restore [locate_data_file buc61006.brep] result
  11
  12 decho off
  13 set che [checkshape result]
  14 decho on
  15
  16 if { [regexp "Faulty" $che] != 1 } {
  17    puts "Error : Checkshape command works wrongly"
  18 }
  19
  20 set 2dviewer 0
  21