C====>Begin Module FOO File t208h.f C---->Makedcls Options: All variables C C External functions C EXTERNAL R1MACH C REAL R1MACH C C Argument variables C REAL X C C====>End Module FOO File t208h.f