Re: Rounding off double precision

On Mon, 31 Mar 2008 06:55:27 -0700 (PDT), Chip Coldwell wrote:

Getting back to the OP,

parameter(Pi = 3.141592653589793238d0)

creates a literal constant with the double-precision value

Not in Fortran, unless "Pi" has been typed DOUBLE PRECISION or has the
appropriate KIND. By default, the double precision constant is truncated
to type REAL.

If you add "implicit none" to the program, the compiler complains because
"Pi" has not been given an explicit type.

--
Dave Seaman
Court affirms Judge Yohn's ruling.
<http://www.ipsnews.net/news.asp?idnews=41761>
.