!====>Begin Module FOO                    File t208i.f                  
!---->Makedcls Options: All variables                                   
!
!     External functions
!
  EXTERNAL            R1MACH
!
  DOUBLE PRECISION    R1MACH
!
!     Argument variables
!
  REAL                X
!
!====>End Module   FOO                    File t208i.f