diff --git a/LuaLibs/ProcessCut.lua b/LuaLibs/ProcessCut.lua
index e69e809..7033d40 100644
--- a/LuaLibs/ProcessCut.lua
+++ b/LuaLibs/ProcessCut.lua
@@ -18,6 +18,7 @@
 -- 2022/08/30 Modificata la condizione che determina l'utilizzo della testa da sotto. Ora controlla se la trave è più grande del doppio della massima larghezza del cubetto.
 -- 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.
 
 -- Tabella per definizione modulo
 local ProcessCut = {}
@@ -402,8 +403,8 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
    -- verifico che i tagli perpendicolari siano perpendicolari al lato più vicino a Z
    local nFirstPerpendicularCut = ( #vCuts ~= 0 and ( vCuts[1][1] or vCuts[3][1]))
    if nFirstPerpendicularCut then
-      local vtTemp = EgtSurfTmFacetNormVersor( nFirstPerpendicularCut, 0, GDB_ID.ROOT) ^ frFace:getVersY()
-      if #vCuts > 0 and vtTemp:isSmall() and not ( bDownCut or bFromBottom) then
+      local vtTemp = EgtSurfTmFacetNormVersor( nFirstPerpendicularCut, 0, GDB_ID.ROOT) ^ frFace:getVersX()
+      if #vCuts > 0 and not ( vtTemp:isSmall()) and not ( bDownCut or bFromBottom) and not bLongCut then
          bDangerousReliefCut = true
       end
    end