cos.gml

开放源码的编译器open watcom 1.6.0版的源代码

.func cos
#include <math.h>
double cos( double x );
.ixfunc2 '&Math' &func
.ixfunc2 '&Trig' &func
.funcend
.desc begin
The &func function computes the cosine of
.arg x
(measured in radians).
A large magnitude argument may yield a result
with little or no significance.
.desc end
.return begin
The &func function returns the cosine value.
.return end
.see begin
.seelist cos acos sin tan
.see end
.exmp begin
#include <math.h>

void main()
  {
    double value;
    value = cos( 3.1415278 );
  }
.exmp end
.class ANSI
.system