Source file:	t208j.f

Intrinsic Functions Called

generic COS, SQRT

Local Variables (+ indicates altered content)

real +A