2993 ND=1 : IF JF>0 THEN ND=A(I,JF) : IF ND=XVF THEN 3020