5 ###########################################################
6 # Sewing algorithm computes tolerance of joint vertex too rough
7 ###########################################################
9 plane p 0 0 0 0 0 1 1 0 0
11 mkface f2 p 0 10 11 21
16 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance res] full MaxTolerance
17 puts "MaxTolerance=$MaxTolerance"
19 set expected_MaxTolerance 3.0
20 set tol_abs_MaxTolerance 0.1
21 set tol_rel_MaxTolerance 0.1
22 checkreal "MaxTolerance" ${MaxTolerance} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}