C====>Begin Module %MAIN File t208q.f C---->Makedcls Options: All variables except SFTRAN3 internals C C Parameter variables C INTEGER MAXTOK PARAMETER (MAXTOK = 10) C C Local variables C CHARACTER*10 TOKL10, TOKLMX C C====>End Module %MAIN File t208q.f