atanh.gml

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

.func atanh
#include <math.h>
double atanh( double x );
.ixfunc2 '&Math' &func
.ixfunc2 '&Trig' &func
.ixfunc2 '&Hyper' &func
.funcend
.desc begin
The &func function computes the inverse hyperbolic tangent of
.arg x.
A domain error occurs if the value of
.arg x
is outside the range (&minus.1,1).
.desc end
.return begin
The &func function returns the inverse hyperbolic tangent value.
.im errnodom
.return end
.see begin
.seelist atanh acosh asinh matherr tanh
.see end
.exmp begin
#include <stdio.h>
#include <math.h>

void main()
  {
    printf( "%f\n", atanh( 0.5 ) );
  }
.exmp output
0.549306
.exmp end
.class WATCOM
.system