The Initialize_Character procedure allocates and initializes a character scalar or array variable.
Calling syntax:
call Initialize (C, [dim1, ..., dimn,] status) |
Input variables:
C | A character scalar variable or a pointer to an unallocated character array variable. | ||
dim1, ..., dimn | Extents of the dimensions for the array C. Only as many dimensions as are needed should be entered. |
Output variables:
C | The C variable has been allocated (if it is an array) and initialized to initialize_character_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_Character code listing contains additional documentation.
Michael L. Hall