how to find extent of 1-dim array in fortran 90?

johnpaulodonnell · 03-21-2007, 11:24 AM

Hi.

Hoping that someone familiar with fortran 90 might be able to help me out...

I just want to check the extent of a 1-dimensional array. A simple write(*,*) 'array extent is:', array_extent to screen is all I need...

I have an array declared:

Code:

real(kind=8),DIMENSION(:,:),intent(inout)   :: bderi

and would like to output bderi's extent at a a certain point. What is the syntax for obtaining the array's extent?

Thanks.

johnpaulodonnell · 03-21-2007, 11:42 AM

size(bderi)

- this will do it