puts "========" puts "OCC26241" puts "========" puts "" ########################################################### # Sewing algorithm computes tolerance of joint vertex too rough ########################################################### plane p 0 0 0 0 0 1 1 0 0 mkface f1 p 0 10 0 10 mkface f2 p 0 10 11 21 settolerance f1 2 settolerance f2 3 sewing res 3 f1 f2 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance res] full MaxTolerance puts "MaxTolerance=$MaxTolerance" set expected_MaxTolerance 3.0 set tol_abs_MaxTolerance 0.1 set tol_rel_MaxTolerance 0.1 checkreal "MaxTolerance" ${MaxTolerance} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}