diff --git a/LuaLibs/ProcessScarfJoint.lua b/LuaLibs/ProcessScarfJoint.lua index bd7adb9..03d4d1e 100644 --- a/LuaLibs/ProcessScarfJoint.lua +++ b/LuaLibs/ProcessScarfJoint.lua @@ -524,9 +524,9 @@ function ProcessScarfJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, dOvmTa local dDiamMax -- se normale verso Y (in orizzontale) if abs(vtRef:getY()) > 0.866 then - dDiamMax = EgtIf( abs( frMor:getVersX():getZ()) < abs( frMor:getVersY():getY()), dL, dW) + dDiamMax = EgtIf( abs( frMor:getVersX():getZ()) - 10 * GEO.EPS_SMALL < abs( frMor:getVersY():getY()), dL, dW) else - dDiamMax = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()), dL, dW) + dDiamMax = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()) - 10 * GEO.EPS_SMALL, dL, dW) end -- determino la distanza tra le due facce inclinate per determinare elevazione local dDistFaces @@ -536,9 +536,9 @@ function ProcessScarfJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, dOvmTa if vFaceOrd[1] ~= 0 then frMor, dL, dW = EgtSurfTmFacetMinAreaRectangle( Proc.Id, vFaceOrd[1]-1, GDB_ID.ROOT) if abs(vtRef:getY()) > 0.866 then - nElevationFace1 = EgtIf( abs( frMor:getVersX():getZ()) < abs( frMor:getVersY():getY()), dL, dW) + nElevationFace1 = EgtIf( abs( frMor:getVersX():getZ()) < abs( frMor:getVersY():getY()) - 10 * GEO.EPS_SMALL, dL, dW) else - nElevationFace1 = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()), dL, dW) + nElevationFace1 = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()) - 10 * GEO.EPS_SMALL, dL, dW) end end dDistFaces = max( abs((ptC[vFaceOrd[2]]-ptC[vFaceOrd[4]])*vtN[vFaceOrd[2]]), nElevationFace1)