4005 X=A(I,JX(2)) : IF X=XVF THEN 4015