Re: please let me know what this program prints

> PROGRAM MAIN
> X = 0.0
> Y = -X
> PRINT '(F4.2)', X
> PRINT '(F4.2)', Y
> PRINT '(F5.2)', Y
> END

Here is the results on a few interesting platforms (ppc-aix, ia64-hpux,
mips-irix and sx-superux):

$ uname -a
AIX regatta 3 5 00202C2A4C00 unknown unknown AIX
$ xlf -qversion
IBM XL Fortran Enterprise Edition V9.1
Version: 09.01.0000.0003
$ xlf a.f && ./a.out
** main === End of Compilation 1 ===
1501-510 Compilation successful for file a.f.
.00
.00
.00

> uname -a
HP-UX td176 B.11.23 U ia64 0391833941 unlimited-user license
> f90 +version
HP F90 v2.9.2
> f90 a.f && ./a.out
a.f
program MAIN

7 Lines Compiled
0.00
-.00
-0.00


$ f90 -v
MIPSpro Compilers: Version 7.4.2m
$ uname -a
IRIX64 rhodes 6.5 10060437 IP27 mips unknown Irix
$ f90 a.f && ./a.out
0.00
0.00
0.00


$ uname -a
SUPER-UX uqbar2 13.1 SX-5
$ f90 -V
FORTRAN90/SX Version 2.0 for SX-5
f90 driver (c) 1995,2005 NEC Corporation
Rev.313 2005/03/31
f90 compiler (c) 1995,2005 NEC Corporation
Rev.313 2005/03/31
$ f90 a.f && ./a.out
a.f:

f90: obsol(17): a.f, line 7: Fixed form source is used.
f90: a.f, main: There is 1 obsolescence.
0.00
-.00
-0.00

--
FX
.