!====>Begin Module %MAIN File builtin.f !---->Makedcls Options: All variables ! ! Intrinsic functions ! INTRINSIC DSQRT, SQRT ! ! Built-in functions ! DOUBLE PRECISION DSQRT ! DOUBLE PRECISION DSQRT ! ! Local variables ! DOUBLE PRECISION X ! REAL Y ! !====>End Module %MAIN File builtin.f