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:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user