DataBeam :

- in Cut correzione calcolo offset per taglio doppio di lato
- in LongCut ammesso uso lama da sotto fino a Norm +3deg in verticale.

LuaLibs/ProcessCut.lua

@@ -1,4 +1,4 @@
--- ProcessCut.lua by Egaltech s.r.l. 2023/04/05
+-- ProcessCut.lua by Egaltech s.r.l. 2023/08/01
 -- Gestione calcolo singoli tagli di lama per Travi
 -- 2021/05/18 I due tagli con testa da sotto di un cubetto sono fatti di seguito.
 -- 2021/06/06 Correzioni per tagli con testa da sotto.
@@ -19,6 +19,7 @@
 -- 2022/09/23 Corretta la condizione per cui è richiesto l'aggiornamento del grezzo.
 -- 2023/01/26 Migliorata la direzione di lavoro della lama in alcuni casi in cui il truciolo veniva scaricato dal lato errato.
 -- 2023/06/19 Aggiunti tagli speciali per evitare il rischio che il cubetto rimanga appoggiato al motore.
+-- 2023/08/01 Correzione su offset per taglio doppio di lato.
 
 -- Tabella per definizione modulo
 local ProcessCut = {}
@@ -468,19 +469,23 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
             end
          end
          local dDiceFaceMaxH = 0
+         local dDiceFaceMinH = GEO.INFINITO
          if ( i % 2) == 0 and bDangerousReliefCut then
             for j = 1, #vCuts[i] do
-               local _, dDiceFaceH = BL.GetFaceHvRefDim( vCuts[i][j] or GDB_ID.NULL, 0)
+               local _, dDiceFaceH, dDiceFaceV = BL.GetFaceHvRefDim( vCuts[i][j], 0)
                dDiceFaceMaxH = max( dDiceFaceMaxH, dDiceFaceH)
+               -- calcolo lato orizzontale minore ipotizzando sia un trapezio
+               local dDiceFaceH2 = ( 2 * EgtSurfArea( vCuts[i][j]) ) / dDiceFaceV - dDiceFaceH
+               dDiceFaceMinH = min( dDiceFaceMinH, dDiceFaceH2)
             end
          end
          -- caso speciale con rischio cubetto sul motore
-         if ( i % 2) == 0 and bDangerousReliefCut and ( dMaxDepth > dDiceFaceMaxH / 2 + BD.CUT_EXTRA_MIN) then
+         if ( i % 2) == 0 and bDangerousReliefCut and ( dMaxDepth > dDiceFaceMaxH - 0.5 * dDiceFaceMinH + BD.CUT_EXTRA_MIN) then
             local bDoubleCut = false
             local dCutExtra = BD.CUT_EXTRA
             if dMaxDepth < dDiceFaceMaxH + BD.CUT_EXTRA then
                bDoubleCut = true
-               dCutExtra = - 0.5 * b3Raw:getDimY() + BD.CUT_EXTRA_MIN
+               dCutExtra = - 0.5 * dDiceFaceMinH + BD.CUT_EXTRA_MIN
             end
             local nSurfToCut = EgtSurfTmBySewing( nAddGrpId, vCuts[i], false)
             local nFaceUseCut1, nFaceUseCut2 = MCH_MILL_FU.ORTHO_BACK, MCH_MILL_FU.ORTHO_FRONT