diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index ac0f2c6..7656e0c 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -71,7 +71,7 @@
 -- 2023/07/19 Correzioni e modifiche ad antischeggia con lama (#1351).
 -- 2023/08/01 Aggiunta gestione rinvio angolare solo per tasche 5 lati, da sotto e perfettamente verticali.
 -- 2023/08/02 Piccola correzione al calcolo della distanza di sicurezza in base al gambo dell'utensile.
-
+-- 2023/08/02 Corretto incremento della profondità pari al raggio utensile per tunnel con sega a catena.
 -- Tabella per definizione modulo
 local ProcessLapJoint = {}
 
@@ -4597,13 +4597,12 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   dDepth = dDepth / 2 + BD.CUT_EXTRA
                end
             end
-            local dWorkDepth = dDepth
-            -- cerco di estendere il taglio considerando la parte arrotondata della lama + 1
+            local dWorkDepth = dMaxMat
+            -- cerco di estendere il taglio considerando la parte arrotondata della sega a catena + 1
             if dMaxMat > dDepth + dSawCornerRad + 1 then
                dWorkDepth = dDepth + dSawCornerRad + 1
             -- se massimo affondamento utensile inferiore alla profondità da lavorare, setto la profondità di lavoro e emetto warning
             elseif dMaxMat < dDepth then
-               dWorkDepth = dMaxMat
                sWarn = 'Warning : elevation bigger than max tool depth'
                EgtOutLog( sWarn)
             end