OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
Code

0024375: Exception in IntAna on touching circles

Browse Source 
Test case for issue CR24375
This commit is contained in:
pdn 2013-11-21 14:13:29 +04:00 committed by bugmaster
parent aa094b3e6e
commit 3cb19cf162
2 changed files with 33 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/IntAna2d/IntAna2d_AnaIntersection_2.cxx
View File

@ -66,7 +66,7 @@ void IntAna2d_AnaIntersection::Perform (const gp_Circ2d& C1,
if (ang1<0) {ang1=2*M_PI+ang1;} // On revient entre 0 et 2PI if (ang1<0) {ang1=2*M_PI+ang1;} // On revient entre 0 et 2PI
lpnt[0].SetValue(XS,YS,ang1,ang2); lpnt[0].SetValue(XS,YS,ang1,ang2);
} }
else if (((sum-d)>Epsilon(sum)) && ((d-dif)>Epsilon(sum))) { else if (((sum-d)>Epsilon(sum)) && ((d-dif)>Epsilon(d+dif))) {
empt=Standard_False; empt=Standard_False;
para=Standard_False; para=Standard_False;
iden=Standard_False; iden=Standard_False;

32
tests/bugs/moddata_3/bug24375 Normal file
View File

@ -0,0 +1,32 @@
puts "========================"
puts " CR24375 "
puts "========================"
puts ""
##################################################################
## Exception in IntAna on touching circles
##################################################################
circle c1 10 0 100
circle c2 10.00000000000001 0 100
set info1 [2dintanalytical c1 c2]
set str1 "Intersection point 1 : +\(\[-0-9.+eE\]+\) +\(\[-0-9.+eE\]+\)\n"
set str2 "parameter on the fist: +\(\[-0-9.+eE\]+\) parameter on the second: +\(\[-0-9.+eE\]+\)\n"
set str3 "Intersection point 2 : +\(\[-0-9.+eE\]+\) +\(\[-0-9.+eE\]+\)\n"
set str4 "parameter on the fist: +\(\[-0-9.+eE\]+\) parameter on the second: +\(\[-0-9.+eE\]+\)\n"
regexp "${str1}${str2}${str3}${str4}" ${info1} full ip1_1 ip1_2 p1_1 p1_2 ip2_1 ip2_2 p2_1 p2_2
set tol_abs_length 1.0e-07
set tol_rel_length 0.01
set expected_p1_1 1.5707963267948966
set expected_p1_2 1.5707963267948968
set expected_p2_1 4.7123889803846897
set expected_p2_2 4.7123889803846897
checkreal "Parameter p1_1" ${p1_1} ${expected_p1_1} ${tol_abs_length} ${tol_rel_length}
checkreal "Parameter p1_2" ${p1_2} ${expected_p1_2} ${tol_abs_length} ${tol_rel_length}
checkreal "Parameter p2_1" ${p2_1} ${expected_p2_1} ${tol_abs_length} ${tol_rel_length}
checkreal "Parameter p2_2" ${p2_2} ${expected_p2_2} ${tol_abs_length} ${tol_rel_length}