The DOUBLE PRECISION statement specifies the type to be double precision, and optionally specifies array dimensions and initializes with values.
DOUBLE PRECISION v[/c/] [, v[/c/] ...
Parameter |
Description |
v |
Name of a symbolic constant, variable, array, array declarator, function, or dummy function |
c |
List of constants for the immediately preceding name |
The declaration can be: DOUBLE PRECISION or REAL*8.
For a declaration such as DOUBLE PRECISION X, the variable X is a REAL*8 element in memory, interpreted as one double-width real number.
If you do not specify the size, a default size is used. The default size, for a declaration such as DOUBLE PRECISION X, can be altered by compiling with any of the options -dbl, -r8, or -xtypemap. See the discussion in Chapter 2 for details.
For a declaration such as REAL*8 X, the variable X is always an element of type REAL*8 in memory, interpreted as a double-width real number.
DOUBLE PRECISION R, S(3,6) REAL*8 T(-1:0,5)