ALLOCATED

 ALLOCATED (array)

 Class:  Inquiry function - Generic

 Indicates whether an allocatable array is currently allocated.

 The "array" must be an allocatable array.

 The result has the value true if ARRAY is currently allocated,
 false if ARRAY is not currently allocated, or undefined if its
 allocation status is undefined.

 The setting of integer size compiler options can affect this
 function.

 Example:

 REAL, ALLOCATABLE, DIMENSION (:,:,:) :: E 
 PRINT *, ALLOCATED (E)       ! Returns the value false
 ALLOCATE (E (12, 15, 20))
 PRINT *, ALLOCATED (E)       ! Returns the value true