update for HEAD-2003091401
[reactos.git] / lib / crtdll / math / atanh.c
1 /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
2 #include <msvcrt/math.h>
3
4
5 double atanh(double x)
6 {
7   return log((1+x)/(1-x)) / 2.0;
8 }