53446383 |
1 | puts "============" |
2 | puts "OCC24658" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | ## fixshape changes source shape |
7 | ####################################################################### |
8 | |
9 | restore [locate_data_file bug24658.brep] a |
10 | |
11 | puts "\nBefore shape healing" |
12 | regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance a] full expected_MaxTolerance |
13 | |
14 | fixshape af a |
15 | |
16 | puts "\nAfter shape healing" |
17 | regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance a] full MaxTol |
18 | |
19 | set tol_abs_MaxTolerance 1.0e-06 |
20 | set tol_rel_MaxTolerance 1.0e-06 |
21 | checkreal "MaxTolerance" ${MaxTol} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance} |