C====>Begin Module %MAIN                  File t208e.f                  
C---->Makedcls Options: All variables                                   
C
C     Local variables
C
      CHARACTER           c
      CHARACTER*81        line
C
      COMPLEX             z,           zz
C
      DOUBLE COMPLEX      zzz,         zzzz
C
      DOUBLE PRECISION    d(10,20,30), e(40,50),    f(60)
C
      INTEGER             i,           j,           k,           m
C
      LOGICAL             logvar
C
      REAL                r,           s(70,80)
C
C====>End Module   %MAIN                  File t208e.f                  
C====>Begin Module SUB                    File t208e.f                  
C---->Makedcls Options: All variables                                   
C
C     Local variables
C
      REAL                x,           y,           z
C
C     Common variables
C
      REAL                a,           b,           c
C
      COMMON / share  /   a,           b,           c
C
C====>End Module   SUB                    File t208e.f                  
C====>Begin Module FUN                    File t208e.f                  
C---->Makedcls Options: All variables                                   
C
C     Local variables
C
      REAL                x,           y,           z
C
C     Common variables
C
      REAL                a,           b,           c
C
      COMMON / share  /   a,           b,           c
C
C====>End Module   FUN                    File t208e.f                  
C====>Begin Module BAR                    File t208e.f                  
C---->Makedcls Options: All variables                                   
C
C     Intrinsic functions
C
      INTRINSIC           cos,         sin,         sqrt
C
C     External functions
C
      EXTERNAL            mysqrt,      mysub
C
      REAL                mysqrt
C
C     Parameter variables
C
      INTEGER             npi
      PARAMETER           (npi = 9)
C
      REAL                pi
      PARAMETER           (pi = 3.14159265)
C
C====>End Module   BAR                    File t208e.f                  
