1 puts "REQUIRED ALL: Faulty shapes in variables faulty_1 to"
7 #######################################################################
8 ## Shape healing unreasonably downgrades tolerance of a face
9 #######################################################################
11 restore [locate_data_file bug26620_ff.brep] ff
13 puts "\nBefore shape healing"
19 puts "\nAfter shape healing"
21 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance r] full MaxTol
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}