tests/bugs/modalg_6/bug27282_1

   1 puts "============"
   2 puts "OCC27282"
   3 puts "============"
   4 puts ""
   5 ###############################
   6 ## [Regression to 6.9.1] smesh/bugs_00/A6: Cut produces an empty shape
   7 ###############################
   8
   9 restore [locate_data_file bug27282_cmpd.brep] a
  10 explode a
  11
  12 bclearobjects
  13 bcleartools
  14 baddobjects a_1
  15 baddtools a_2
  16
  17 bfillds
  18
  19 # CUT-operation
  20 bbop result 2
  21
  22 set log [bopargcheck result #F]
  23
  24 if { [string compare -nocase $log "Shape(s) seem(s) to be valid for BOP.\n"] } {
  25   puts "ERROR. result is not valid for BOP"
  26 }
  27
  28 checkshape result
  29 checknbshapes result -solid 1 -face 4
  30 checkprops result -v 2.96079e+007
  31
  32 checkview -display result -2d -path ${imagedir}/${test_image}.png