3000 X=A(I,JX(K))