How to Handle xx.Dxx on the CRAY
The r8_convert script will change the floating point constants like 3.5 to explicit double precision constants of the form 3.5D0 if you do not specify the CONST option:
- To compile on the CRAY, use f90 -dp ...
Instead, you can use the CONST option:
- % r8_convert infile.f outfile.F CONST
- It replaces 3.5e-7 by CONST(3.5,-7)
- You then have to use fpreproc to convert at compile time:
- fpreproc oufile.F newfile.f -D__UNIX
- CONST(3.5,-7) 3.5E-7 on the CRAY
- CONST(3.5,-7) 3.5D-7 on the workstations
- See https://w3.pppl.gov/~pshare/help/port_strategy_hlp.html