Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!husc6!cmcl2!nrl-cmf!umix!umich!pla
From: pla@zippy.eecs.umich.edu (Paul Anderson)
Newsgroups: comp.sys.apollo
Subject: FORTRAN write problem?
Message-ID: <521@zippy.eecs.umich.edu>
Date: Mon, 30-Nov-87 12:28:19 EST
Article-I.D.: zippy.521
Posted: Mon Nov 30 12:28:19 1987
Date-Received: Thu, 3-Dec-87 05:03:14 EST
Sender: usenet@zippy.eecs.umich.edu
Reply-To: pla@zippy.eecs.umich.edu.eecs.umich.edu (Paul Anderson)
Organization: University of Michigan EECS Dept. Ann Arbor
Lines: 29
UUCP-Path: ihnp4!umich!zippy.eecs.umich.edu!pla


We get this output from the following program:

$ test.bin
 1.0000000000000000E-99
 ***********************
 1.0000000000000000-101
$

Where test.ftn is:

	read*8 x
	x = 1.0e-99
	write(6,*) x
	x = 1.0e-100
	write(6,*) x
	x = 1.0e-101
	write(6,*) x
	end

We are running sr9.6, but we've had this problem
for the last few releases.  Any ideas?

Note that we get problems only with an exponent of E-100.
Perhaps there is some kind of overflow problem, but I'd
like to know if it is my fault or the ftnlib's fault.

Thanks...
    Paul Anderson
    University of Michigan EECS dept