- commenti

This commit is contained in:
luca.bacis
2021-12-23 10:27:12 +01:00
parent 7647cd3a45
commit 36c3b4a354
+8 -6
View File
@@ -4253,6 +4253,9 @@ local function ManageAntiSplintByMill( Proc, nPhase, nRawId, nPartId, b3Raw,
return true, sMyWarn
end
---------------------------------------------------------------------
-- funzione di utlilità (disegna l'indice della faccia su ognuna) per
-- verificare visivamente quali sono le facce coinvolte nei calcoli
---------------------------------------------------------------------
local function ShowFacesNumber( SurfId)
local nFacCnt = EgtSurfTmFacetCount( SurfId)
@@ -4403,11 +4406,10 @@ local function AreAllFacesOrthogonal( nSurfId, dCosSideAng)
for i = 0, nFacCnt - 1 do
local fc1 = i
local fc2 = EgtIf( i < nFacCnt - 1, i + 1, 0)
dOrtho = AreFacesOrthogonal( nSurfId, fc1, fc2, dCosSideAng)
if dOrtho == 0 then
dOrtho = AreFacesOrthogonal( nSurfId, fc1, fc2, dCosSideAng)
end
-- alla prima faccia non ortogonale esco dal ciclo
if dOrtho ~= 0 then break end
end
return dOrtho
@@ -4420,11 +4422,11 @@ local function MakeObliquePoket( Proc, nPartId, tvtN, nSideFace, ptPs, tDimAndRe
-- applico la svuotatura
local bOk, sWarn, _, _, _ = MakePocket( Proc, nPartId, ptPs, tvtN, nSideFace, sMchFind, nUseRoughTool, sPocketing, dPrevFaceElev, tDimAndRef, dAng)
if not bOk and sWarn == '' then
sWarn = 'Unable to make Pocket on oblique face'
end
return bOk, sWarn
end