Path: utzoo!attcan!uunet!samsung!dali.cs.montana.edu!uakari.primate.wisc.edu!sdd.hp.com!zaphod.mps.ohio-state.edu!brutus.cs.uiuc.edu!psuvax1!psuvm!gl4
From: GL4@psuvm.psu.edu
Newsgroups: comp.lang.fortran
Subject: problem with "pe" format
Message-ID: <90155.122858GL4@psuvm.psu.edu>
Date: 4 Jun 90 16:28:58 GMT
Organization: Penn State University
Lines: 32

(I hope this isn't a repost -- I think I screwed up the first time)

A user brought the following program to my attention, and I am unable to
explain the output:

---------------------------------------------
       x=1.11
       fs=10.0
       write(*,32) x,fs
32     format(1pe13.3,f10.1)
       write(*,*) fs
       end
---------------------------------------------
output:
       1.111E+00     100.0
      10.00000
---------------------------------------------

 Does anyone know why the value of "fs" is multiplied by a factor of
 ten? I've tried this on a Sun-3, a Gould 9005 running UTX/32 2.1A,
 and an IBM mainframe, and gotten the same results.

 If I change the number in front of "pe" to a 2, "fs" is multiplied
 by a factor of 10**2, and so on.

 Any clarification would be greatly appeciated (even of the type, "This
 is standard Fortran behaviour, you lamebrain. RFTM").

 Garth Longdon.

 gl4@psuvm.bitnet
 longdon@itd.nrl.navy.mil