tests/bugs/modalg_7/bug27049

   1 puts "============"
   2 puts "OCC27049"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Make non-destructive mode be defined by default in Boolean operations
   7 #######################################################################
   8
   9 restore [locate_data_file bug26619_shell_ft81_h0.brep] h0
  10 restore [locate_data_file bug26619_the_face.brep] f0
  11
  12 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTolerance1
  13
  14 tolerance f0
  15
  16 #turn on non-destructive mode of BOP
  17 #setflags h0 locked
  18 #setflags f0 locked
  19 #bnondestructive 1
  20
  21 bop h0 f0
  22 bopsection result
  23 checkprops result -l 150.23
  24 checknbshapes result -vertex 47 -edge 47 -t -m "result"
  25
  26 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTolerance2
  27
  28 set expected_MaxTolerance ${MaxTolerance1}
  29 set tol_abs_MaxTolerance 0.0001
  30 set tol_rel_MaxTolerance 0.0001
  31 checkreal "MaxTolerance" ${MaxTolerance2} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}
  32
  33 checkview -display result -2d -path ${imagedir}/${test_image}.png
  34
  35 if {[regexp "alone_1" [checksection result]]} {
  36   puts "Error: the section is not closed"
  37 }