From 3138c6ffbc0e4f83ae99922050702630573f6100 Mon Sep 17 00:00:00 2001
From: DarioS <dario.sassi@egaltech.com>
Date: Tue, 11 Jan 2022 15:03:19 +0100
Subject: [PATCH] DataBeam : - modifiche a GetNearestParalOpposite e
 GetNearestOrthoOpposite.

---
 LuaLibs/BeamLib.lua    | 11 ++++++-----
 LuaLibs/FacesBySaw.lua |  2 +-
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/LuaLibs/BeamLib.lua b/LuaLibs/BeamLib.lua
index 99f5294..a3af060 100644
--- a/LuaLibs/BeamLib.lua
+++ b/LuaLibs/BeamLib.lua
@@ -1,4 +1,4 @@
--- BeamLib.lua by Egaltech s.r.l. 2021/11/26
+-- BeamLib.lua by Egaltech s.r.l. 2022/01/11
 -- Libreria globale per Travi
 -- 2020/07/28 Corretto calcolo attacchi e uscite di lame per non uscire dalla faccia sotto.
 -- 2020/08/18 Aggiunto a GetNearestParalOpposite e GetNearestOrthoOpposite parametro opzionale vtNorm.
@@ -8,6 +8,7 @@
 -- 2021/07/01 In GetNearestOrthoOpposite premio direzioni destra/sinistra.
 -- 2021/07/15 Aggiunta GetFaceElevationFromPointDir.
 -- 2021/09/12 Aggiustamenti in GetNearestParalOpposite e GetNearestOrthoOpposite.
+-- 2022/01/11 In GetNearest*Opposite ridotto vantaggio XY rispetto a Z da 1 -> 0.9 a 1 -> 0.99.
 
 -- Tabella per definizione modulo
 local BeamLib = {}
@@ -262,8 +263,8 @@ function BeamLib.GetNearestParalOpposite( vtRef, vtNorm)
       vtMyRef = vtMyRef - ( vtMyRef * vtNorm) * vtNorm
       vtMyRef:normalize()
    end
-   -- se prevalente una componente orizzontale (con piccolo vantaggio)
-   if abs( vtMyRef:getX()) > 0.9 * abs( vtMyRef:getZ()) or abs( vtMyRef:getY()) > 0.9 * abs( vtMyRef:getZ()) then
+   -- se prevalente una componente orizzontale (con piccolissimo vantaggio)
+   if abs( vtMyRef:getX()) > 0.99 * abs( vtMyRef:getZ()) or abs( vtMyRef:getY()) > 0.99 * abs( vtMyRef:getZ()) then
       if abs( vtMyRef:getX()) > abs( vtMyRef:getY()) - GEO.EPS_SMALL then
          if vtMyRef:getX() > -GEO.EPS_SMALL then
             return MCH_MILL_FU.PARAL_LEFT
@@ -296,8 +297,8 @@ function BeamLib.GetNearestOrthoOpposite( vtRef, vtNorm)
       vtMyRef = vtMyRef - ( vtMyRef * vtNorm) * vtNorm
       vtMyRef:normalize()
    end
-   -- se prevalente una componente orizzontale (con piccolo vantaggio)
-   if abs( vtMyRef:getX()) > 0.9 * abs( vtMyRef:getZ()) or abs( vtMyRef:getY()) > 0.9 * abs( vtMyRef:getZ()) then
+   -- se prevalente una componente orizzontale (con piccolissimo vantaggio)
+   if abs( vtMyRef:getX()) > 0.99 * abs( vtMyRef:getZ()) or abs( vtMyRef:getY()) > 0.99 * abs( vtMyRef:getZ()) then
       -- se prevale la componente destra/sinistra (con piccolo vantaggio)
       if abs( vtMyRef:getX()) > 0.9 * abs( vtMyRef:getY()) then
          if vtMyRef:getX() > -GEO.EPS_SMALL then
diff --git a/LuaLibs/FacesBySaw.lua b/LuaLibs/FacesBySaw.lua
index 554368e..a45175b 100644
--- a/LuaLibs/FacesBySaw.lua
+++ b/LuaLibs/FacesBySaw.lua
@@ -206,7 +206,7 @@ function FacesBySaw.MakeTwo( Proc, nPhase, nRawId, nPartId, dOvmHead, sCutType,
       EgtOutLog( sErr)
       return false, sErr
    end
-   -- verifico il numero di facce della tacca
+   -- verifico il numero di facce
    if Proc.Fct < 2 then
       local sErr = 'Error : TwoFacesBySaw facet number not supported'
       EgtOutLog( sErr)