3215 FOR I=1 TO NF : A(I,0)=0 : NEXT I