◄Up► ◄Contents► ◄Index► ◄Back►
─────REAL ──────────────────────────────────────────────────────────────────
 
     Action
 
     Specifies the REAL type for user-defined names
 
     Syntax
 
     REAL[*bytes] vname[ [attrs] ] [*length][(dim)][/values/]
     [, vname[ [attrs] ] [*length] [(dim)] [/values/] ]...
 
     The order of the <length> and <dim> parameters can be reversed.
 
     Parameter          Description
 
     bytes              The length, in bytes, of the names in the REAL
                        statement. Must be 4 or 8. Can be overridden
                        by the <length> parameter.
 
     vname              Name of a constant, variable, or function.
                        Cannot be the name of a subroutine or main
                        program.
 
     [attrs]            A list of attributes, separated by commas. Valid
                        attributes are: ALIAS, ALLOCATABLE, C, EXTERN,
                        FAR, HUGE, NEAR, PASCAL, REFERENCE, VALUE.
 
     length             Length of name in bytes. Must be 4 or 8.
 
     dim                A dimension declarator. Specifying <dim>
                        declares <vname> as an array.
 
     values             A list of constants to initialize <vname> to,
                        separated by commas.
 
     Remarks
 
     The name <vname> is defined for the entire program unit, and it
     cannot be defined by any other type statement in that program
     unit.
 
     If both <bytes> and <length> are omitted, the default length is
     four bytes.
 
     REAL statements must precede all executable statements.
 
     REAL*8 and DOUBLE PRECISION are the same data type.
 
     Examples
 
           REAL goof, abs
           REAL*4 wx1, wx3*8, wx5, wx6*8
                                    -♦-