cos(x) computes the cosine of x.
FORTRAN 77 and later
result = cos(x)
x - The type shall be real or complex.The return value is of the same type and kind as x. The real part of the result is in radians. If x is of the type real, the return value lies in the range .
program test_cos
real :: x = 0.0
x = cos(x)
end program test_cos