C====>Begin Module FOO                    File t208l.f                  
C---->Makedcls Options: All variables                                   
C
C     Argument variables
C
      INTEGER M, N
C
      REAL A(M,N)
C
C     Local variables
C
      REAL B(1,2,3,4,5,6,7)
C
C====>End Module   FOO                    File t208l.f