NAME

fcopy - copy file in to file out


SYNOPSIS


call fcopy (in, out)

integer in, out



DESCRIPTION

Assuming that both files are opened, positioned, and ready to go,
the routine copies lines from the current file position until
an EOF is reached on file 'in'.
'in' and 'out' are file identifiers returned by open or create.


IMPLEMENTATION

'Fcopy' simply makes repeated calls to getlin and putlin.


SEE ALSO

open, create, getlin, putlin


DIAGNOSTICS

None