diff --git a/LuaLibs/ProcessDtTenon.lua b/LuaLibs/ProcessDtTenon.lua
index 535c9dd..3004440 100644
--- a/LuaLibs/ProcessDtTenon.lua
+++ b/LuaLibs/ProcessDtTenon.lua
@@ -42,7 +42,7 @@ local function VerifyOrientation( Proc, vtN, b3Raw)
          return ( vtN:getZ() >= -0.343)
       end
    -- se trave media
-   elseif b3Raw:getDimZ() <= 300 then
+   elseif b3Raw:getDimZ() <= 350 then
       -- se tenone praticamente in asse, accetto fino a -20 deg
       if abs( vtN:getY()) < 0.04 then
          return ( vtN:getZ() >= -0.343)
diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index d65394d..4c38120 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -4738,10 +4738,12 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             -- settaggio voluto da Alessandro/Fabio (per fare angoli con fresa piccola)
             sMchFind = 'Pocket'
             local dDiam = min( dH, dV)
-            if bSinglePart and (( Proc.Fct == 1) or ( Proc.Fct == 2 and bIsL) or ( Proc.Fct == 3 and bIsU)) then
+            if bSinglePart and (( Proc.Fct == 1) or ( Proc.Fct == 2 and bIsL) or ( Proc.Fct == 3 and bIsU) or Proc.Fct == 4) then
                sMchFind = 'OpenPocket'
                if bIsU then
                   dDiam = GetUShapeWidth( Proc, nFacInd) or dDiam
+               elseif Proc.Fct == 4 then
+                  dDiam = min( dH, dV) * 0.5
                else
                   dDiam = 300
                end