8.4.1 Initialize_Logical Procedure

The Initialize_Logical procedure allocates and initializes a logical scalar or array variable.

Calling syntax:

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

Input variables:

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

Output variables:

	L		The L variable has been allocated (if it is an array) and initialized to initialize_logical_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_Logical code listing contains additional documentation.