OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
Code Packages Releases Activity

0024065: Wrong intersection point

Browse Source 
Adding test case for issue CR24065

Small corrections of test cases
This commit is contained in:
emv 2013-08-29 13:30:41 +04:00 committed by bugmaster
parent 0f180c0c18
commit 4355f260b0
4 changed files with 34 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/IntAna/IntAna_QuadQuadGeo.cxx
View File

@ -326,7 +326,8 @@ gp_Ax2 DirToAx2(const gp_Pnt& P,const gp_Dir& D)
Standard_Real denom2 = denom*denom;
Standard_Real ddenom = 1. - denom2;
denom = ( Abs(ddenom) <= 1.e-9 ) ? 1.e-9 : ddenom;
//denom = ( Abs(ddenom) <= 1.e-9 ) ? 1.e-9 : ddenom;
denom = ( Abs(ddenom) <= 1.e-16 ) ? 1.e-16 : ddenom;
Standard_Real par1 = dist1/denom;
Standard_Real par2 = -dist2/denom;

2
tests/bugs/modalg_1/bug10232
View File

@ -22,7 +22,7 @@ puts "Start boolean operation ..."
bopsection result
puts "Finish boolean operation ..."
set length 3210.71
set length 3385.0
set nb_v_good 1197
set nb_e_good 1182

2
tests/bugs/modalg_2/bug239_2
View File

@ -14,6 +14,6 @@ puts [boptuc result]
set nb_v_good 18
set nb_e_good 11
set length 2481.26
set length 2434.21
set 2dviewer 0

30
tests/bugs/moddata_3/bug24065 Normal file
View File

@ -0,0 +1,30 @@
puts "========"
puts "OCC24065"
puts "========"
puts ""
#######################################################################
# Wrong intersection point
#######################################################################
restore [locate_data_file bug24065_f.brep] f
restore [locate_data_file bug24065_e.brep] e
# 1
set CMP_TOL 1.e-7
set facetolmax [tolmax f]
regexp {max tol = ([-0-9.+eE]+)} ${facetolmax} full FaceMaxTolerance
if { ${FaceMaxTolerance} > ${CMP_TOL} } {
puts "Error: invalid tolerance of face"
}
mksurface s f
mkcurve c e
intersect i c s
# 2
set CMP_DIST 1.86835288e-8
set distmax [projponf f i_2]
regexp {proj dist = ([-0-9.+eE]+)} ${distmax} full MaxDist
if { [expr abs(${MaxDist} - ${CMP_DIST})] > ${CMP_TOL} } {
puts "Error: Wrong intersection point"
}