tests/bugs/moddata_2/bug6862_4

   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 # test small edges
  12 restore [locate_data_file OCC651a.brep] a
  13
  14 decho off
  15 puts "Checking shapes: bopargcheck a b /FTVEIP ..."
  16 set resstr [bopargcheck a /FTVEIP]
  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