mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-14 13:30:48 +03:00
0033170: Modeling Algorithms - Checking for canonical geometry: plane detection problems
GeomLib_IsPlanarSurface.cxx - using poles for checking BSpline, Bezier curves and surface changed on checking by curve, surface points. BRepOffset_MakeOffset.cxx - set normal of plane surface according to normal of initial face surface tests/cr/bugs/bug33170 - new test case added
This commit is contained in:
30
tests/cr/bugs/bug33170
Normal file
30
tests/cr/bugs/bug33170
Normal file
@@ -0,0 +1,30 @@
|
||||
puts "============"
|
||||
puts "0033170: Modeling Algorithms - Checking for canonical geometry: plane detection problems"
|
||||
puts "============"
|
||||
puts ""
|
||||
|
||||
set ExpectGap 0.0051495320504590563
|
||||
brestore [locate_data_file bug33170.brep] f
|
||||
set log1 [getanasurf asurf1 f pln 0.006]
|
||||
regexp {Gap = +([-0-9.+eE]+)} $log1 full gap1
|
||||
if {[isdraw asurf1]} {
|
||||
set log [dump asurf1]
|
||||
if { [regexp {Plane} $log ] != 1 } {
|
||||
puts "Error: surface is not a plane"
|
||||
}
|
||||
} else {
|
||||
puts "Error: required surface is not got"
|
||||
}
|
||||
checkreal FoundGap1 $gap1 $ExpectGap 1.0e-9 0.0
|
||||
#
|
||||
set log2 [getanasurf asurf2 f pln 1.]
|
||||
regexp {Gap = +([-0-9.+eE]+)} $log1 full gap2
|
||||
if {[isdraw asurf2]} {
|
||||
set log [dump asurf2]
|
||||
if { [regexp {Plane} $log ] != 1 } {
|
||||
puts "Error: surface is not a plane"
|
||||
}
|
||||
} else {
|
||||
puts "Error: required surface is not got"
|
||||
}
|
||||
checkreal FoundGap2 $gap2 $ExpectGap 1.0e-9 0.0
|
@@ -1,2 +1,3 @@
|
||||
001 base
|
||||
002 approx
|
||||
003 bugs
|
||||
|
Reference in New Issue
Block a user