8.2.1 Initialize_Real Procedure

The Initialize_Real procedure allocates and initializes a real scalar or array variable.

Calling syntax:

call Initialize (R, [dim1, ..., dimn,] status)

Input variables:

 R  A real scalar variable or a pointer to an unallocated real array variable.
 dim1, ..., dimn  Extents of the dimensions for the array R. Only as many dimensions as are needed should be entered.

Output variables:

 R  The R variable has been allocated (if it is an array) and initialized to initialize_real_flag.
 status  If present, the status variable is set to either 'Memory Error' or 'Success' depending on program execution. If not present, the procedure aborts if unsuccessful when the DEBUG_LEVEL is set high enough.

Internal variable:

 allocate_status  Allocation Status.

The Initialize_Real code listing contains additional documentation.

Michael L. Hall