8.5.1 Initialize_Character Procedure

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