mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
changed number of nodes in case of GeomAbs_Line in Extrema_GExtCC::Perform() function. changed number of nodes in case of GeomAbs_Line in Extrema_GExtCC::Perform(). fixed incorrect indexes and Coeff check in Extrema_CurveCache::Extrema_CurveCache added to avoid int overflow. Added test case bugs/modalg_5/bug24200 Added check if (aNbS[i] * Coeff[i]) too big in Extrema_GExtCC::Perform().
38 lines
859 B
Plaintext
38 lines
859 B
Plaintext
puts "============"
|
|
puts "OCC24200"
|
|
puts "============"
|
|
puts ""
|
|
#################################################
|
|
# Wrong result obtained by Extrema Curve/Curve
|
|
#################################################
|
|
|
|
restore [locate_data_file bug24200_c1] c1
|
|
restore [locate_data_file bug24200_c2] c2
|
|
set info_1 [extrema c1 c2]
|
|
|
|
if { [regexp "ext_15" $info_1] != 1 } {
|
|
puts "Error : Extrema is wrong"
|
|
} else {
|
|
puts "OK : Extrema is correct"
|
|
}
|
|
|
|
trim c1t c1 677.8 678.8
|
|
trim c2t c2 2477 2479
|
|
extrema c1t c2t
|
|
|
|
cvalue c1t 678.34269564178146 x y z
|
|
vertex v1 x y z
|
|
cvalue c2t 2478.1205500811761 x y z
|
|
vertex v2 x y z
|
|
distmini d v1 v2
|
|
regexp {([-0-9.+eE]+)} [dump d_val] full dist
|
|
|
|
set checkdist 2.54211497292521e-013
|
|
|
|
if { [expr 1.*abs($checkdist - $dist)/$checkdist] > 0.1 } {
|
|
puts "Error : Distance is wrong"
|
|
} else {
|
|
puts "OK: Distance is correct"
|
|
}
|
|
|