4160 IF KME=2 THEN VY(I)=A(I,J)-VX(I)