tests/bugs/heal/bug26620

   1 puts "REQUIRED ALL: Faulty shapes in variables faulty_1 to"
   2
   3 puts "============"
   4 puts "OCC26620"
   5 puts "============"
   6 puts ""
   7 #######################################################################
   8 ## Shape healing unreasonably downgrades tolerance of a face
   9 #######################################################################
  10
  11 restore [locate_data_file bug26620_ff.brep] ff
  12
  13 puts "\nBefore shape healing"
  14 checkshape ff
  15 tolerance ff
  16
  17 fixshape r ff
  18
  19 puts "\nAfter shape healing"
  20 checkshape r
  21 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance r] full MaxTol
  22
  23 set expected_MaxTolerance 0.1
  24 set tol_abs_MaxTolerance 0.5
  25 set tol_rel_MaxTolerance 0.5
  26 checkreal "MaxTolerance" ${MaxTol} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}