COS — Cosine functionCOS(X) computes the cosine of X.
     RESULT = COS(X)
     | X | The type shall be REAL or
COMPLEX.
      | 
REAL,
the return value lies in the range  -1 \leq \cos (x) \leq 1.
               program test_cos
            real :: x = 0.0
            x = cos(x)
          end program test_cos
     | Name | Argument | Return type | Standard
 | 
COS(X)    | REAL(4) X     | REAL(4)     | Fortran 77 and later
 | 
DCOS(X)   | REAL(8) X     | REAL(8)     | Fortran 77 and later
 | 
CCOS(X)   | COMPLEX(4) X  | COMPLEX(4)  | Fortran 77 and later
 | 
ZCOS(X)   | COMPLEX(8) X  | COMPLEX(8)  | GNU extension
 | 
CDCOS(X)  | COMPLEX(8) X  | COMPLEX(8)  | GNU extension
      |