mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
93937391be
Upgrade method of computing vertex tolerance. Update function, which used the old method. Test case for issue CR26241 Delete obsolete variables. Small correction of test cases for issue CR26241
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}
|