COS                           Cosine of Angle                        pp 139

 Syntax:  Cos (Radians) ;

 Type:    Real

 Form:    Function

 Purpose: Return the cosine of Radians, which may be Integer or Real.
          The result is type Real.  The argument is in radians.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          Radians : Real           ;  { Argument to Cos function in Radians }
          RealVar : Real           ;  { Result of Cos function              }

       BEGIN
          RealVar := Cos (Radians) ;  { Set RealVar = Cos of Radians        }
       END.