2237 XP(K)=A(I,JX(K))