summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/atanh/satanhs.c
diff options
context:
space:
mode:
authorjofret2008-05-20 15:00:41 +0000
committerjofret2008-05-20 15:00:41 +0000
commit4887092b4731a40a970cfd0f867287e45db06955 (patch)
tree32b4e340fae8a9f14a8f0607c8fdb6a88cb7adf3 /src/elementaryFunctions/atanh/satanhs.c
parent5e0af9bec2fcb724a8433910c8d665601d082e1f (diff)
downloadscilab2c-4887092b4731a40a970cfd0f867287e45db06955.tar.gz
scilab2c-4887092b4731a40a970cfd0f867287e45db06955.tar.bz2
scilab2c-4887092b4731a40a970cfd0f867287e45db06955.zip
* Adding atanh Algorithm
* Update file License * Need some tests improvement
Diffstat (limited to 'src/elementaryFunctions/atanh/satanhs.c')
-rw-r--r--src/elementaryFunctions/atanh/satanhs.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/elementaryFunctions/atanh/satanhs.c b/src/elementaryFunctions/atanh/satanhs.c
index 36eeb99a..15354aad 100644
--- a/src/elementaryFunctions/atanh/satanhs.c
+++ b/src/elementaryFunctions/atanh/satanhs.c
@@ -10,9 +10,9 @@
*
*/
-#include <math.h>
#include "atanh.h"
+#include "atan.h"
float satanhs(float x) {
- return (atanhf(x));
+ return (-cimags(catans(FloatComplex(0.0, -x))));
}