DO	dofio.c	/^#define DO(x)	if(n=x) err(n>0?errflag:endflag,n,df/
DO_F	dofio.c	/^#define DO_F(x)	if(n=x) err_f(n>0?errflag:endflag,/
ERR	lio.h	/^#define ERR(x)	if(n=(x)) err(n>0?errflag:endflag,n/
ERRCHK	lio.h	/^#define ERRCHK(x)	if(n=(x)) goto got_err;$/
ERRNM	nmlio.h	/^#define ERRNM(x)	if(n=(x)) return(n);$/
GET	fio.h	/^#define GET(x)		if((x=(*getn)())<0) return(x)$/
GETC	lread.c	/^#define GETC(x) (x=(*getn)())$/
Mmkvers	mkvers.c	/^main(argc, argv)$/
PUT	fio.h	/^#define PUT(x)		{if(n=(*putn)(x)) return(n);}$/
UNGETC	rsnmle.c	/^#define UNGETC() ungetc(ch,cf)$/
VAL	fio.h	/^#define VAL(x)		(x!='\\n'?x:' ')$/
abs	lio.h	/^#define abs(z)	(z<0?-z:z)$/
ap_end	fmt.c	/^char *ap_end(s) char *s;$/
b_char	util.c	/^b_char(from, to, tolen) char *from, *to; ftnlen to/
c_dfe	c_dfe.c	/^c_dfe(a,flag,str) cilist *a; char *str;$/
c_di	c_iio.c	/^c_di(a) icilist *a;$/
c_due	due.c	/^c_due(a,flag) cilist *a;$/
c_fi	c_iio.c	/^c_fi(a) icilist *a;$/
c_le	dolio.c	/^c_le(a,flag) cilist *a;$/
c_li	c_iio.c	/^c_li(a) icilist *a;$/
c_rfi	rfi.c	/^c_rfi()$/
c_sfe	c_sfe.c	/^c_sfe(a,flag,mode,str) cilist *a; char *str; \/* ch/
c_si	c_iio.c	/^c_si(a) icilist *a;$/
c_sue	sue.c	/^c_sue(a,flag) cilist *a;$/
c_wfi	wfi.c	/^c_wfi()$/
canseek	open.c	/^canseek(f) FILE *f; \/*SYSDEP*\/$/
chk_len	lio.h	/^#define chk_len(w) if(recpos+w > line_len) PUT('\\n/
do_fio	dofio.c	/^do_fio(number,ptr,len) ftnint *number; ftnlen len;/
do_lio	dolio.c	/^do_lio(type,number,ptr,len) ftnint *number,*type; /
do_ud	douio.c	/^do_ud(number,ptr,len) ftnint *number; ftnlen len; /
do_uio	douio.c	/^do_uio(number,ptr,len) ftnint *number; ftnlen len;/
do_us	douio.c	/^do_us(number,ptr,len) ftnint *number; ftnlen len; /
dof_err	dofio.c	/^dof_err(n)$/
due_err	douio.c	/^due_err(s) char *s;$/
dwidth	lio.h	/^#define dwidth(z) ((z!=0.0 && (abs(z)>=LDHIGH || a/
e_d	fmt.c	/^e_d(s,p) char *s,**p;$/
e_rdfe	rdfe.c	/^e_rdfe()$/
e_rdfi	rfi.c	/^e_rdfi()$/
e_rdue	due.c	/^e_rdue()$/
e_rsfe	rsfe.c	/^e_rsfe()$/
e_rsfi	rfi.c	/^e_rsfi()$/
e_rsle	lread.c	/^e_rsle()$/
e_rsli	rsli.c	/^e_rsli()$/
e_rsue	sue.c	/^e_rsue()$/
e_wdfe	wdfe.c	/^e_wdfe()$/
e_wdfi	wfi.c	/^e_wdfi()$/
e_wdue	due.c	/^e_wdue()$/
e_wsfe	wsfe.c	/^e_wsfe()$/
e_wsfi	wfi.c	/^e_wsfi()$/
e_wsle	lwrite.c	/^e_wsle()$/
e_wsli	wsli.c	/^e_wsli()$/
e_wsue	sue.c	/^e_wsue()$/
en_fio	dofio.c	/^en_fio()$/
endlinp	lread.c	/^#define endlinp(x)	(ltab[x+1]&EIN)	\/* EOF, newline/
err	fio.h	/^#define err(f,n,s)	{if(f) return(errno=n); else fa/
err_f	dofio.c	/^#define err_f(f,n,s)	{if(f) return(dof_err(n)); el/
f77_abort	f77_abort.c	/^f77_abort( err_val, act_core )$/
f_back	backspace.c	/^f_back(a)$/
f_clos	close.c	/^f_clos(a) cllist *a;$/
f_end	endfile.c	/^f_end (a)$/
f_exit	close.c	/^f_exit()$/
f_init	open.c	/^f_init()$/
f_inqu	inquire.c	/^f_inqu(a) inlist *a;$/
f_list	fmt.c	/^char *f_list(s) char *s;$/
f_open	open.c	/^f_open(a) olist *a;$/
f_rew	rewind.c	/^f_rew(a) alist *a;$/
f_s	fmt.c	/^char *f_s(s,curloc) char *s;$/
fatal	err.c	/^fatal(n,s) char *s;$/
ffputc	err.c	/^ffputc(c, f)$/
finode	open.c	/^finode(f) FILE *f;$/
fk_open	open.c	/^fk_open(rd,seq,fmt,n) ftnint n;$/
flush_	err.c	/^flush_(u) ftnint *u;$/
fmt_bg	dofio.c	/^fmt_bg()$/
g_char	util.c	/^g_char(a,alen,b) char *a,*b; ftnlen alen;$/
get_int	rsnmle.c	/^get_int(subval)$/
get_pars	rsnmle.c	/^get_pars( entry, addr, nelem, vlen, vtype )$/
get_repet	lread.c	/^get_repet()$/
gt_num	fmt.c	/^char *gt_num(s,n) char *s; int *n;$/
i_tem	fmt.c	/^char *i_tem(s) char *s;$/
icvt	fmtlib.c	/^icvt(value, ndigit, sign)$/
ini_std	open.c	/^ini_std(u,F,w) FILE *F;$/
inode	open.c	/^inode(a) char *a;$/
isapos	lread.c	/^#define isapos(x)	(ltab[x+1]&AP)	\/* apost., quote /
isblnk	lread.c	/^#define isblnk(x)	(ltab[x+1]&B)	\/* space, tab, new/
isdev	open.c	/^isdev(s) char *s;$/
isdigit	fmt.c	/^#define isdigit(x)	(x>='0' && x<='9')$/
isexp	lread.c	/^#define isexp(x)	(ltab[x+1]&EX)	\/* d, e, D, E *\/$/
isint	rsnmle.c	/^#define isint(x)	(ltab[x+1]&INTG)	\/* 0-9, plus, mi/
islgc	rsnmle.c	/^#define islgc(x)	(ltab[x+1]&LGC)	\/* 0-9, period, t/
isrl	rsnmle.c	/^#define isrl(x)		(ltab[x+1]&RL)	\/* 0-9, plus,  min/
issep	lread.c	/^#define issep(x)	(ltab[x+1]&SP)	\/* space, tab, new/
isspace	fmt.c	/^#define isspace(s)	(s==' ')$/
l_C	lread.c	/^l_C()$/
l_CHAR	lread.c	/^l_CHAR()$/
l_L	lread.c	/^l_L()$/
l_R	lread.c	/^l_R(flg) int flg;$/
l_read	lread.c	/^l_read(number,ptr,len,type) ftnint *number,type; f/
l_write	lwrite.c	/^l_write(number,ptr,len,type) ftnint *number,type; /
last_char	util.c	/^last_char(f) FILE *f;$/
lcase	fio.h	/^#define lcase(s)	((s >= 'A') && (s <= 'Z') ? s+('a/
lr_comm	lread.c	/^lr_comm()$/
lwrt_0	lwrite.c	/^lwrt_0()$/
lwrt_A	lwrite.c	/^lwrt_A(p,len) char *p; ftnlen len;$/
lwrt_C	lwrite.c	/^lwrt_C(a,b) float a,b;$/
lwrt_D	lwrite.c	/^lwrt_D(dn) double dn;$/
lwrt_DC	lwrite.c	/^lwrt_DC(a,b) double a,b;$/
lwrt_F	lwrite.c	/^lwrt_F(fn) float fn;$/
lwrt_I	lwrite.c	/^lwrt_I(in) ftnint in;$/
lwrt_L	lwrite.c	/^lwrt_L(ln) ftnint ln;$/
ne_d	fmt.c	/^ne_d(s,p) char *s,**p;$/
not_legal	fio.h	/^#define not_legal(u)	(u>=MXUNIT || u<0)$/
now_acc	util.c	/^LOCAL now_acc(x,mode)$/
nowreading	util.c	/^nowreading(x) unit *x;$/
nowwriting	util.c	/^nowwriting(x) unit *x;$/
nullfld	lread.c	/^nullfld()	\/* look for null field following a repea/
op_gen	fmt.c	/^op_gen(a,b,c,rep,s) char *s;$/
pars_f	fmt.c	/^pars_f()$/
pr_put	wsfe.c	/^pr_put(c)$/
prnt_ext	err.c	/^prnt_ext()$/
prnt_fmt	err.c	/^prnt_fmt(n) int n;$/
prnt_int	err.c	/^prnt_int()$/
rd_AW	rdfmt.c	/^rd_AW(p,w,len) char *p; ftnlen len;$/
rd_F	rdfmt.c	/^rd_F(p,w,d,len) ftnlen len; ufloat *p;$/
rd_H	rdfmt.c	/^rd_H(n,s) char *s;$/
rd_I	rdfmt.c	/^rd_I(n,w,len) ftnlen len; uuint *n;$/
rd_L	rdfmt.c	/^rd_L(n,w,len) uuint *n; ftnlen len;$/
rd_POS	rdfmt.c	/^rd_POS(s) char *s;$/
rd_ed	rdfmt.c	/^rd_ed(p,ptr,len) char *ptr; struct syl *p; ftnlen /
rd_int	lread.c	/^rd_int(x) double *x;$/
rd_mvcur	rdfmt.c	/^rd_mvcur()$/
rd_name	rsnmle.c	/^rd_name(ptr)$/
rd_ned	rdfmt.c	/^rd_ned(p,ptr) char *ptr; struct syl *p;$/
rm_unit	close.c	/^rm_unit(unit)$/
s_rdfe	rdfe.c	/^s_rdfe(a) cilist *a;$/
s_rdfi	rfi.c	/^s_rdfi(a) icilist *a;$/
s_rdue	due.c	/^s_rdue(a) cilist *a;$/
s_rsfe	rsfe.c	/^s_rsfe(a) cilist *a; \/* start *\/$/
s_rsfi	rfi.c	/^s_rsfi(a) icilist *a;$/
s_rsle	lread.c	/^s_rsle(a) cilist *a;	\/* start read sequential list/
s_rsli	rsli.c	/^s_rsli(a) icilist *a;$/
s_rsne	rsnmle.c	/^s_rsne(a) namelist_arglist *a;$/
s_rsue	sue.c	/^s_rsue(a) cilist *a;$/
s_wdfe	wdfe.c	/^s_wdfe(a) cilist *a;$/
s_wdfi	wfi.c	/^s_wdfi(a) icilist *a;$/
s_wdue	due.c	/^s_wdue(a) cilist *a;$/
s_wsfe	wsfe.c	/^s_wsfe(a) cilist *a;	\/*start*\/$/
s_wsfi	wfi.c	/^s_wsfi(a) icilist *a;$/
s_wsle	lwrite.c	/^s_wsle(a) cilist *a;$/
s_wsli	wsli.c	/^s_wsli(a) icilist *a;$/
s_wsne	wsnmle.c	/^s_wsne(a) namelist_arglist *a;$/
s_wsue	sue.c	/^s_wsue(a) cilist *a;$/
sizeof	f_errlist.c	/^int f_nerr = (sizeof(f_errlist)\/sizeof(char *));$/
skip	fmt.c	/^#define skip(s)		while(isspace(*s)) s++$/
t_getc	lread.c	/^t_getc()$/
t_putc	lwrite.c	/^t_putc(c) char c;$/
t_runc	close.c	/^t_runc (b, flag, str)$/
t_sep	lread.c	/^t_sep()$/
tr_unit	open.c	/^tr_unit(old_unit,err_str)$/
w_ed	wrtfmt.c	/^w_ed(p,ptr,len) char *ptr; struct syl *p; ftnlen l/
w_ned	wrtfmt.c	/^w_ned(p,ptr) char *ptr; struct syl *p;$/
width	lio.h	/^#define width(z) ((z!=0.0 && (abs(z)>=LHIGH || abs/
wr_mvcur	wrtfmt.c	/^wr_mvcur()$/
wrt_AP	wrtfmt.c	/^wrt_AP(p)$/
wrt_AW	wrtfmt.c	/^wrt_AW(p,w,len) char * p; ftnlen len;$/
wrt_E	wrtfmt.c	/^wrt_E(p,w,d,e,len,expch) ufloat *p; ftnlen len; ch/
wrt_F	wrtfmt.c	/^wrt_F(p,w,d,len) ufloat *p; ftnlen len;$/
wrt_G	wrtfmt.c	/^wrt_G(p,w,d,e,len) ufloat *p; ftnlen len;$/
wrt_H	wrtfmt.c	/^wrt_H(a,b)$/
wrt_IM	wrtfmt.c	/^wrt_IM(ui,w,m,len) uuint *ui; ftnlen len;$/
wrt_L	wrtfmt.c	/^wrt_L(l,width,len) uuint *l; ftnlen len;$/
x_getc	rsfe.c	/^x_getc()$/
x_putc	wsfe.c	/^x_putc(c)$/
x_rnew	rsfe.c	/^x_rnew()			\/* find next record *\/$/
x_tab	c_sfe.c	/^x_tab()$/
x_wend	wsfe.c	/^x_wend(last) char last;$/
x_wnew	wsfe.c	/^x_wnew()$/
y_getc	rdfe.c	/^y_getc()$/
y_putc	wdfe.c	/^y_putc(c)$/
y_rnew	rdfe.c	/^y_rnew()$/
y_tab	c_dfe.c	/^y_tab()$/
y_wnew	wdfe.c	/^y_wnew()$/
z_getc	c_iio.c	/^z_getc()$/
z_putc	c_iio.c	/^z_putc(c) char c;$/
z_rnew	c_iio.c	/^z_rnew()$/
z_tab	c_iio.c	/^z_tab()$/
z_ungetc	c_iio.c	/^z_ungetc(ch,cf) char ch;$/
z_wnew	c_iio.c	/^z_wnew()$/
