tests/bugs/moddata/bug6862_1

   1 puts "============"
   2 puts "OCC6862"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Tool for checking arguments of Boolean Operations
   7 #######################################################################
   8
   9 set BugNumber OCC6862
  10
  11 # self-intersection test
  12 restore [locate_data_file OCC497a.brep] a_1
  13 restore [locate_data_file OCC497b.brep] a_2
  14
  15 decho off
  16 set resstr [bopargcheck a_2]
  17 decho on
  18
  19 if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} {
  20     puts "OK ${BugNumber}"
  21 } else {
  22     puts "Faulty ${BugNumber}"
  23 }
  24
  25 set 2dviewer 0
  26