Visible to Intel only — GUID: GUID-A0047BE8-F0CC-4B54-A40D-8D479108EF62
Visible to Intel only — GUID: GUID-A0047BE8-F0CC-4B54-A40D-8D479108EF62
ALLOCATED
Inquiry Intrinsic Function (Generic): Indicates whether an allocatable array or allocatable scalar is currently allocated.
result = ALLOCATED ([ARRAY=]array)
result = ALLOCATED ([SCALAR=]scalar)
array |
(Input) Must be an allocatable array. |
scalar |
(Input) Must be an allocatable scalar. |
Results
The result is a scalar of type default logical.
The result has the value true if argument array or scalar is currently allocated; it has the value false if the argument is not currently allocated.
When the argument keyword ARRAY is used, array must be an allocatable array. When the argument keyword SCALAR is used, scalar must be an allocatable scalar.
Example
REAL, ALLOCATABLE :: A(:)
...
IF (.NOT. ALLOCATED(A)) ALLOCATE (A (5))
Consider the following:
REAL, ALLOCATABLE, DIMENSION (:,:,:) :: E
PRINT *, ALLOCATED (E) ! Returns the value false
ALLOCATE (E (12, 15, 20))
PRINT *, ALLOCATED (E) ! Returns the value true