Unformatted(binary) Fortran standard output

Andy Clews andy at syma.sussex.ac.uk
Sat Jul 7 03:00:11 AEST 1990


Someone I know (no, it isn't me) wants to run a Fortran program that
produces very large amounts of unformatted/binary output. Rather than send
the output to a file on the host machine, she would like to pipe it
(or redirect it) so as to send the output through the LAN to her
own machine, on which she is running the program via rsh(1).

That is, she is logged into host A; the executable is on host B; she
wants to run it on B and send the output over the LAN to host B, by
doing    rsh B "foo" > foo.output    (foo.output thus appearing on host A).

Machine B has more computing power but not enough disk space to hold the
output.

The problem is that Fortran does not seem to allow unformatted i/o on
the standard channel, stdout. The compiler in use is ATS Fortran on a
Sequent Symmetry S81, running DYNIX 3.0.17. The statements that are
giving the problem are of the form

	write(*) list

We've tried using  write(6)  but no joy.

This seems to me a useful application for Fortran in a UNIX environment;
shame it doesn't seem possible. Rewriting in C is out of the question,
so I am told (existing Fortran program has about 1600 lines of code).

Can anyone advise?

-- 
Andy Clews, Computing Service, Univ. of Sussex, Brighton BN1 9QN, England
JANET: andy at syma.sussex.ac.uk   BITNET: andy%syma.sussex.ac.uk at uk.ac



More information about the Comp.unix.questions mailing list