From cf8fe55f60a95fb68d31528731b79fea2be015ad Mon Sep 17 00:00:00 2001
From: jofret
Date: Thu, 27 Nov 2008 15:12:26 +0000
Subject: Correct asinh BUG

---
 src/elementaryFunctions/asinh/zasinhs.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/elementaryFunctions/asinh/zasinhs.c')

diff --git a/src/elementaryFunctions/asinh/zasinhs.c b/src/elementaryFunctions/asinh/zasinhs.c
index 3b8f9034..9322b04e 100644
--- a/src/elementaryFunctions/asinh/zasinhs.c
+++ b/src/elementaryFunctions/asinh/zasinhs.c
@@ -22,5 +22,5 @@ doubleComplex		zasinhs(doubleComplex z) {
   doubleComplex i_z = DoubleComplex(-zimags(z), zreals(z));
   doubleComplex asin_i_z = zasins(i_z);
 
-  return DoubleComplex(zimags(asin_i_z), zreals(asin_i_z));
+  return DoubleComplex(zimags(asin_i_z), -zreals(asin_i_z));
 }
-- 
cgit