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

0027856: Regression vs 6.7.1: General Fuse operation fails to fuse the solids

Browse Source 
Method WorkWithBoundaries::BoundaryEstimation(...) has been brought in balance with IsParallel(...) method, which checks if cylinder axes are parallel.
This commit is contained in:
nbv 2016-10-25 16:39:13 +03:00 committed by apn
parent dd6b34fda4
commit 95f8c6082d
3 changed files with 134 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/IntPatch/IntPatch_ImpImpIntersection_4.gxx
View File

@ -2442,7 +2442,7 @@ void WorkWithBoundaries::BoundaryEstimation(const gp_Cylinder& theCy1,
//one axis can be translated by parallel shifting till intersection).
const Standard_Real aCosA = aD1.Dot(aD2);
const Standard_Real aSqSinA = 1.0 - aCosA * aCosA;
const Standard_Real aSqSinA = aD1.XYZ().CrossSquareMagnitude(aD2.XYZ());
//If sine is small then it can be compared with angle.
if (aSqSinA < Precision::Angular()*Precision::Angular())

15
tests/bugs/modalg_6/bug27856_1 Normal file
View File

@ -0,0 +1,15 @@
puts "========"
puts "OCC27856"
puts "========"
puts ""
#################################################
# Regression vs 6.7.1: General Fuse operation fails to fuse the solids
#################################################
restore [locate_data_file bug27856_int_solids.brep] b
bclearobjects
bcleartools
baddcompound b
bfillds
bbuild result
checknbshapes result -solid 12

118
tests/bugs/modalg_6/bug27856_2 Normal file
View File

@ -0,0 +1,118 @@
puts "========"
puts "OCC27856"
puts "========"
puts ""
#################################################
# Regression vs 6.7.1: General Fuse operation fails to fuse the solids
#################################################
# Before the fix, EMPTY result (no points, no curves)
# was returned in every considered case.
restore [locate_data_file bug27856_int_solids.brep] b
explode b so
# first pair of solids
explode b_1 f
explode b_2 f
# ----
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_1_2 b_2_2 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 0.00026943844817627679 0.0 1.0e-3
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_1_4 b_2_4 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 6.5039065434503992e-005 0.0 1.0e-2
# ----
# second pair of solids
explode b_3 f
explode b_4 f
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_3_2 b_4_2 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 0.00030603795647549098 0.0 1.0e-3
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_3_4 b_4_4 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 0.00029242900088525842 0.0 1.0e-3
# ----
# third pair of solids
explode b_5 f
explode b_6 f
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_5_2 b_6_2 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 2.0312181042800029e-005 0.0 1.0e-2
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_5_4 b_6_4 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 0.00023415774730871651 0.0 1.0e-3
# ----
# fourth pair of solids
explode b_7 f
explode b_8 f
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_7_2 b_8_2 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 0.00028209392756607551 0.0 1.0e-3
# ----
set Toler 0.0
set NbCurv 0
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} [bopcurves b_7_4 b_8_4 -2d] full Toler NbCurv
if {${NbCurv} != 1} {
puts "Error: Number of curves is bad!"
}
checkreal TolReached $Toler 2.497244318171703e-005 0.0 1.0e-2