From: "Dan Nagle" <[log in to unmask]>
Sent: Friday, January 13, 2006 1:11 AM
> robin wrote:
> > From: Bill Long
> > Sent: Thursday, January 12, 2006 9:48 AM
> <snip>
> >>Well, using DOUBLE PRECISION as a replacement for real*8 is even worse.
> >>It is likely to be wrong on at least some systems - the very definition of
not portable.
> >
> > DOUBLE PRECISION gives double precision on every Fortran,
> > and by definition is fully portable.
> >
> > On the other hand, real*8 is not portable.
>
> This obviously confuses "non-standard" with "non-portable".
It confuses nothing of the sort.
> In fact, DOUBLE PRECISION is _not_ portable, as it means 64 bit real
> on some systems, and 128 bit real on others for example.
It is fully portable, as it always means DOUBLE precision.
> REAL*8 always means 64 bit real, it is therefore portable.
> It is not standard,
and therefore is NOT PORTABLE.
> and therefore may not be supported
which means that it is NOT portable.
> if the processor is strictly enforcing the standard (as it may well,
> especially when the whine-on-non-standard switch is enabled).
|