2250 IF XP(K)<VC(M,K) THEN IJ(K)=M-1 : M=NVC(K)