sliceprocess.asv

来自「数学问题：实用下料中下料方式」· ASV 代码 · 共 32 行

function [wayOfCutting, numOfMeterial, L] = SliceProcess(P, lenOfM)
global Array;
lenOfArray = size(Array);
i = 1;
total = 0;
way = [];
surplus = [];
wayOfCutting = {};
numOfMeterial = 0;
while (i <= lenOfArray)
    total = total + Array(P(i));
    if total <= lenOfM && i ~= lenOfArray
        way = [way;Array(P(i))];
    elseif total <= lenOfM && i == lenOfArray
        way = sort(way);
        surplus = [surplus;lenOfM - total - Array(P(i)))];
        AddWay(wayOfCutting, way);
        
    else
        way = sort(way);
        surplus = [surplus;lenOfM - (total - Array(P(i)))];
        AddWay(wayOfCutting, way);
        way = [];
        total = 0;
        i = i - 1;
    end
    i = i + 1;
end