2635 IF X>Y THEN VC(K-1,1)=Y : VC(K,1)=X : KA=1