>From another message:
> thanks, I've learned something here... but I assume I'm right in thinking
> that this (g77 automatic arrays) is (was) an extension to the Fortran 77
> standard? ... or is my memory of f77 getting fuzzy?
subroutine mysub(a)
real, dimension(:) :: a
real, dimension(size(a)) :: b ! b is an automatic array
real, dimension(5) :: c ! c is just a local array
Well, size was not F77 (I don't think); neither is the style of the
declarations. True F77 (officianados: count the blanks!):
SUBROUTINE MYSUB(I)
INTEGER I
C A IS AN AUTOMATIC ARRAY
REAL A(I)
C C IS JUST A LOCAL ARRAY
REAL C(5)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|