tests/bugs/moddata_2/bug6862_9

   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 possibility to merge edges
  12 box b1 10 20 10
  13 box b2 20 10 10
  14 explode b1 e
  15 explode b2 e
  16 tcopy b2_10 ee2
  17 wire ww b2_10 ee2
  18 donly b1_10 ww
  19
  20 set resstr [bopargcheck b1_10 ww -O /RFTVIP]
  21
  22 if {    $resstr=="Faulties, that can not be treated by BOP, are detected.\n" } {
  23     puts "OK ${BugNumber}"
  24 } else {
  25     puts "Faulty ${BugNumber}"
  26 }
  27
  28 checkview -display result -2d -path ${imagedir}/${test_image}.png