fpar
extern char *artskp(),*fpar();
sf = fpar(nf, flds, t1, ctype, i, 1);
fpar(nf, flds, t, keywant, 1, 0);
if (fpar(nf, flds, t, 'A', 1, 0) != 0) {
if (fpar(nf, flds, t2, 'D',
if (fpar(nf, flds, t2, 'D', 1, 0)) {
fpar(nf, flds, t1, 'A', 1, 0);