SIZE function on an ALLOCATABLE array

[Jon_D]

Hello,

The following code prints out 10 as the size of the ALLOCATABLE array after the array is deallocated. Is this the correct behavior or a compiler bug? I am using the latest version of the Intel Fortran compiler.

Thanks for any clarification.

PROGRAM Main
    IMPLICIT NONE
    
    INTEGER,ALLOCATABLE :: iTestArray(:)
    
    WRITE (*,*) SIZE(iTestArray)
    
    ALLOCATE (iTestArray(10))
    WRITE (*,*) SIZE(iTestArray)
    
    DEALLOCATE (iTestArray)
    WRITE (*,*) SIZE(iTestArray)
    
END

[Steven_L_Intel1]

It's your error for calling SIZE on an unallocated array. The result of that is undefined.

[andrew_4619]

You should use the function allocated(itestarray)