>
> "Shawn" nospam.com> wrote in message
> news:ejl8g6$l55$1@news.nems.noaa.gov...

>> Thank you all. I was confused.
>>
>> Now I still have a question: I have an array holding real type of data,
>> if I don't know its dimension(e.g. array size), can I write a loop to
>> print each item out? Something like the following?
>>
>> DO 210 I=1, array_dimension_unknown
>> PRINT *, 'TSDATA(',I,')= ', TSDATA(I)
>> 210 CONTINUE
>>
>> Thank you very much.

>
> You need to tell us which compiler you're using. In Fortran 95 you could
> write:
>
> DO I=1, size(TSDATA)
> PRINT *, 'TSDATA(',I,')= ', TSDATA(I)
> end do
>
> However, it's unusual in a small test program to be in the situation that
> you don't know what the size of an array is. You need to tell us more.
>
> Regards,
>
> Mike Metcalf
>
>