4860 A(I,J)=(X-PX)/DEX