mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-10 17:40:24 +08:00
78aade7569
Extend "proximity" command to be able to compute the proximity value; Implement classes for calculate proximity value between two shapes; Add possibility to set up the number of sample points for the input shapes; Add tests lowalgos/proximity.
19 lines
351 B
Plaintext
19 lines
351 B
Plaintext
set er [expr abs(${expected} - ${val})]
|
|
|
|
if {${er} > ${tol}} {
|
|
puts "Error: bad proximity value"
|
|
} else {
|
|
puts "OK"
|
|
}
|
|
|
|
if {${status1} != ${expected_status1}} {
|
|
puts "Error: bad 1st proximity point status"
|
|
} else {
|
|
puts "OK"
|
|
}
|
|
|
|
if {${status2} != ${expected_status2}} {
|
|
puts "Error: bad 2nd proximity point status"
|
|
} else {
|
|
puts "OK"
|
|
} |