• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /**
2  * This file has no copyright assigned and is placed in the Public Domain.
3  * This file is part of the mingw-w64 runtime package.
4  * No warranty is given; refer to the file DISCLAIMER.PD within this package.
5  */
6 
7 #include <math.h>
8 
asinh(double x)9 double asinh(double x)
10 {
11   if (isinf(x*x + 1)) {
12     if (x > 0)
13       return log(2) + log(x);
14     else
15       return -log(2) - log(-x);
16   }
17   return log(x + sqrt(x*x + 1));
18 }
19