1C====>Begin Module FOO                    File t208r.f
2C---->Makedcls Options: All variables except SFTRAN3 internals
3C
4C     Parameter variables
5C
6      CHARACTER*(*)       S
7      PARAMETER           (S = 'hello')
8C
9      INTEGER             MAXY
10      PARAMETER           (MAXY = 54321)
11      INTEGER             MAXZ
12      PARAMETER           (MAXZ = 12345+MAXY)
13      INTEGER             MAXTOK
14      PARAMETER           (MAXTOK = 10)
15C
16C     Argument variables
17C
18      CHARACTER*(*)       ARGCHR(MAXROW,MAXCOL,*)
19C
20      INTEGER             MAXCOL,      MAXROW
21C
22C     Local variables
23C
24      CHARACTER           ONE,         ONEAGAIN
25      CHARACTER*3         THREE
26      CHARACTER*(MAXTOK)  TOKLST
27      CHARACTER*2         TWO,         TWOB
28C
29C====>End Module   FOO                    File t208r.f
30