just_jc.m

来自「这个一个遗传算法的实例」· M 代码 · 共 16 行

function BDJC=JUST_JC(QAL,JCL,HL,NL,nL)
%冲击判断
BDJ=[1,1,1];
for i=1:NL;
    for j=1:nL-1;
        if abs((QAL(i,j+1)-QAL(i,j))/HL(j))>JCL(i);
            BDJ(i)=0;
            break;
        end;
    end;
    if BDJ(i)==0;
        break;
    end;
end;
BDJ;
BDJC=BDJ(1)*BDJ(2)*BDJ(3);