1
C====>Begin Module FOO File t208r.f
2
C---->Makedcls Options: All variables
7
PARAMETER (S = 'hello')
10
PARAMETER (MAXY = 54321)
12
PARAMETER (MAXZ = 12345+MAXY)
14
PARAMETER (MAXTOK = 10)
18
CHARACTER*(*) ARGCHR(MAXROW,MAXCOL,*)
20
INTEGER MAXCOL, MAXROW
24
CHARACTER ONE, ONEAGAIN
26
CHARACTER*(MAXTOK) TOKLST
29
C====>End Module FOO File t208r.f