mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-06-05 11:24:17 +03:00
d18c866246
Upgrade method of computing vertex tolerance. Update function, which used the old method. Test case for issue CR26241 Delete obsolete variables.
23 lines
677 B
Plaintext
Executable File
23 lines
677 B
Plaintext
Executable File
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}
|