Mercurial > hg > octave-nkf

diff src/mappers.cc @ 331:ee2dbf1eb16c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-02-04 07:15:58 by jwe]
author jwe
date Fri, 04 Feb 1994 07:15:58 +0000
parents a99f28f5e351
children 7ea224e713cd
line wrap: on
line diff
--- a/src/mappers.cc
+++ b/src/mappers.cc
@@ -210,7 +210,7 @@
 atanh (const Complex& x)
 {
   static Complex i (0, 1);
-  Complex retval = log ((i + x) / (i - x)) / 2.0;
+  Complex retval = log ((1 + x) / (1 - x)) / 2.0;
   return retval;
 }