Anyone trying to write a code that is portable between an SGI
and a Cray^H^H^H^H SGI machine will probably use REAL(kind=something).
Note that REAL(kind=8) falls into the category I'm trying to address
(base class of REAL with modification through KIND).
An amusing declaration I've seen a few times is:
real(kind(0.0d0)) x
Bill