DataWall :

- portato a 10000 il numero massimo di lavorazioni ottimizzabili in un singolo passaggio con TSP (grazie a nuova EgtNumKernel.dll).
This commit is contained in:
DarioS
2021-11-22 19:26:51 +01:00
parent d6e3cbfc26
commit f1de6d8cbe
+3 -2
View File
@@ -370,11 +370,12 @@ local function SortMach( nPhase, PrevMch, nPartId, nType, sStartName, bExistName
-- ordino le lavorazioni (in gruppi di max 1000 entità)
--EgtOutLog('Dati per ShortestPath :')
local SP_MAX_ENT = 10000
local nBase = 0
while nBase < #TabCut do
-- calcolo ordinamento
EgtSpInit()
for i = 1, min( #TabCut - nBase, 1000) do
for i = 1, min( #TabCut - nBase, SP_MAX_ENT) do
local ptS = TabCut[nBase+i].Start
local ptE = TabCut[nBase+i].End
EgtSpAddPoint( ptS:getX(), ptS:getY(), ptS:getZ(), 0, 0,
@@ -395,7 +396,7 @@ local function SortMach( nPhase, PrevMch, nPartId, nType, sStartName, bExistName
end
end
-- incremento la base
nBase = nBase + 1000
nBase = nBase + SP_MAX_ENT
end
return PrevMch