landcon_c.m

来自「遗传算法例程：通过MATLAB」· M 代码 · 共 47 行

function y = LandCon_C(FS,zs,TrfsM,FSd,k,t,ChromF12,ChromzsF1,ChromzsF1_con,ChromF1_con,FS1u,FS1d,ChromF22,ChromzsF2,ChromzsF2_con,ChromF2_con,FS2u,FS2d)
% 这个是计算降落机场容量约束的函数
% k为机场编号，t为时间段编号，在任意一个机场的任意一个时间段，都不能超过降落容量

for i = 1:length(zs)
    [A,B] = max(TrfsM(i,:));
    Trfs(:,i) = B;
end

sum = 0;

for i = 1:length(zs)
    if zs(i) == 0
        if Trfs(i) == t & FSd(i) == k    % 
            sum = sum + 1;
        end
    end
end

for i = 1:length(ChromzsF1)
    if ChromzsF1(i) == 0
        if ChromF12(i) == t & FS1d(i) == k
            sum = sum + 1;
        end
    end
    if ChromzsF1_con(i) == 0
        if ChromF1_con(i) == t & FS1u(i) == k
            sum = sum + 1;
        end
    end
end

for i = 1:length(ChromzsF2)
    if ChromzsF2(i) == 0
        if ChromF22(i) == t & FS2d(i) == k
            sum = sum + 1;
        end
    end
    if ChromzsF2_con(i) == 0
        if ChromF2_con(i) == t & FS2u(i) == k
            sum = sum + 1;
        end
    end
end

y = sum;    % k机场t时刻的实际降落容量