Zero magnitude check has been added before gp::Vec::Angle() usage
Signed-off-by: oan <oan@opencascade.com>
if (aDist < aDefFace)
{
// Lets check parameters for angular deflection.
- if (aPrevVec2.Angle (aTmpVec) < myAngle)
+ if (aPrevVec2.SquareMagnitude() < gp::Resolution() ||
+ aTmpVec.SquareMagnitude() < gp::Resolution() ||
+ aPrevVec2.Angle (aTmpVec) < myAngle)
{
// For current Iso line we can remove this parameter.
aToRemove2.Add (aParam2);
set env(os_type) $tcl_platform(platform)
if { [string compare $env(os_type) "windows"] != 0 } {
puts "OS = Linux"
- set good_tri 392920
- set good_nod 200191
+ set good_tri 310982
+ set good_nod 159222
set good_defl 0.0092442421472207319
} else {
puts "OS = Windows NT"
- set good_tri 392920
- set good_nod 200191
+ set good_tri 310982
+ set good_nod 159222
set good_defl 0.0092442421472207319
}
set TheFileName shading_wrongshape_027.brep
set bug_freenodes "OCC22687"
-#set nbfreenodes(All) 2
+set nbfreenodes(All) 3
set max_rel_tol_diff 1
if { [string compare $command "shading"] != 0 } {
#set bug_area "OCC22687"
set rel_tol 2.13
} else {
- set rel_tol 0.48
+ set rel_tol 0.4806230236905097
}
set nbcross(All) 2
set bug_cross "OCC23184"