mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
Methods IsUClosed() and IsVClosed() are changed (check distance to middle point is added).
18 lines
638 B
Plaintext
18 lines
638 B
Plaintext
puts "========"
|
|
puts "OCC28694"
|
|
puts "========"
|
|
puts ""
|
|
###############################################################
|
|
# IGES reader produces too small edge covered by its vertices
|
|
###############################################################
|
|
|
|
igesbrep [locate_data_file bug26671.igs] r *
|
|
|
|
foreach e [explode r e] {
|
|
if {[lsearch [dump $e] degenerated] == -1 && [validrange $e] == "edge has no valid range"} {
|
|
regexp {Mass : *([0-9\-+.eE]+)} [lprops $e] dummy len
|
|
regexp {Tolerance MAX=([0-9\-+.eE]+)} [tolerance $e] dummy tol
|
|
puts "ERROR: OCC28694 is reproduced. Edge $e (length=$len, tolerance=$tol) is too small"
|
|
}
|
|
}
|