tanh.gml

来自「开放源码的编译器open watcom 1.6.0版的源代码」· GML 代码 · 共 39 行

.func tanh
#include <math.h>
double tanh( double x );
.ixfunc2 '&Math' &func
.ixfunc2 '&Trig' &func
.ixfunc2 '&Hyper' &func
.funcend
.desc begin
The &func function computes the hyperbolic tangent of
.arg x.
.np
When the
.arg x
argument is large, partial or total loss of significance may occur.
The
.kw matherr
function will be invoked in this case.
.desc end
.return begin
The &func function returns the hyperbolic tangent value.
.im errnoref
.return end
.see begin
.seelist tanh cosh sinh matherr
.see end
.exmp begin
#include <stdio.h>
#include <math.h>

void main()
  {
    printf( "%f\n", tanh(.5) );
  }
.exmp output
0.462117
.exmp end
.class ANSI
.system