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