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