mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
f542b7bbf1
1. Earlier we could not put any IntPatch_Point to the intersection curve. The fix makes the algorithm of IntPatch_Points searching more precise. It is achieved by redetermination of earlier found vertices with help of minimization the distance between boundary of one intersection argument and another intersection argument (surface). 2. Additional check has been added, if IntPatch_Point adjusted to the domain boundary is true intersection point. 3. Method Contap_ArcFunction::Surface() has been added. 4. Method LastComputedPoint() has been added for IntPatch_ArcFunction and Contap_ArcFunction classes. 5. Correction in FindMaxDistance() method (see IntTools_FaceFace.cxx file) according to pure Golden-ratio minimization algorithm. Earlier this function worked wrong with small searching intervals. 6. Insignificant correction in math_BrentMinimum.cxx file (elimination of "defines"). Creation of test case for issues #27221 an #27252. Adjusting some test cases according to their new behavior. Correction according to the last remarks. Small correction of shape names for issue CR27252 Test case for issue 28210 Small correction of test case for issue 28210
70 lines
1.6 KiB
Plaintext
70 lines
1.6 KiB
Plaintext
puts "================"
|
|
puts "OCC25292"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################
|
|
# Face/Face intersection algorithm gives different results for different order of the arguments
|
|
#######################################################################
|
|
|
|
puts "##############################"
|
|
puts "#!!!Search \"Attention\" keyword on this web-page for additional checking!!!"
|
|
puts "##############################"
|
|
puts ""
|
|
puts ""
|
|
|
|
# intersect command for trimmed surfaces
|
|
|
|
#This value must be equal to the analogical value in bug25292_35 and bug25292_36 of "bugs modalg_5" testgrid.
|
|
set GoodNbCurv 2
|
|
|
|
restore [locate_data_file bug25292_f1.brep] f1
|
|
restore [locate_data_file bug25292_f2.brep] f2
|
|
|
|
mksurface s1 f1
|
|
mksurface s2 f2
|
|
|
|
# trim s1 in accordance with the UV-bounds of f1:
|
|
trimv s1t s1 19.1600000005 19.6600000005
|
|
|
|
# trim s2 in accordance with the UV-bounds of f2:
|
|
trim s2t s2 0. 1.570796326795 -275 275
|
|
|
|
###################
|
|
intersect res s2t s1t
|
|
###################
|
|
|
|
set che [whatis res]
|
|
set ind [string first "3d curve" $che]
|
|
if {${ind} >= 0} {
|
|
#Only variable "res" exists
|
|
|
|
copy res res_1
|
|
}
|
|
|
|
set ic 1
|
|
set AllowRepeate 1
|
|
while { $AllowRepeate != 0 } {
|
|
set che [whatis res_$ic]
|
|
set ind [string first "3d curve" $che]
|
|
if {${ind} < 0} {
|
|
set AllowRepeate 0
|
|
} else {
|
|
bounds res_$ic U1 U2
|
|
|
|
if {[dval U2-U1] < 1.0e-9} {
|
|
puts "Error: Wrong curve's range!"
|
|
}
|
|
|
|
xdistcs res_$ic s1 U1 U2 10 1e-7
|
|
xdistcs res_$ic s2 U1 U2 10 1e-7
|
|
|
|
incr ic
|
|
}
|
|
}
|
|
|
|
if {[expr {$ic - 1}] == $GoodNbCurv} {
|
|
puts "OK: Curve Number is good!"
|
|
} else {
|
|
puts "Error: Curve Number is bad!"
|
|
}
|