[MITgcm-devel] Re: [MITgcm-support] STDOUT monitor output

[Ed Hill]

On Mon, 2006-01-16 at 15:59 -0500, chris hill wrote:
> Hi Tom,
> 
>   If you modify the mon_out.F I/O statement to read
> 
>     WRITE(msgBuf(36:57),'(1X,1P1E21.13E3)') dval
> 
>   I think it will work properly - at least it does for me with g77 and 
> ifort. If it turns out this is standard Fortran we'll fix it in the full 
> code shortly.

Hi Chris,

It is standard Fortran77:

http://www.fortran.com/fortran/F77_std/rjcnf0001-sh-13.html#sh-13
http://www.cs.mtu.edu/~shene/COURSES/cs201/NOTES/chap05/format.html
http://www.ictp.trieste.it/~manuals/programming/sun/fortran/f77rm/4_statements.doc.html#3914

but if you change it please ensure that all the codes that run in
testreport also parse it correctly.  The last time we worked on the
precision-comparison code it took some hours of fiddling on the Suns to
make it all work correctly.

Ed

-- 
Edward H. Hill III, PhD
office:  MIT Dept. of EAPS;  Rm 54-1424;  77 Massachusetts Ave.
             Cambridge, MA 02139-4307
emails:  eh3 at mit.edu                ed at eh3.com
URLs:    http://web.mit.edu/eh3/    http://eh3.com/
phone:   617-253-0098
fax:     617-253-4464