SUBROUTINE FOO ( X )

Argument Definitions (+ indicates altered content)
REAL              +X
Source file:t208h.f
Intrinsic Functions Called
GENERIC            SQRT
External Functions and Subroutines Called
REAL               R1MACH