diff options
Diffstat (limited to 'src/elementaryFunctions/atanh/catanhs.c')
| -rw-r--r-- | src/elementaryFunctions/atanh/catanhs.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/elementaryFunctions/atanh/catanhs.c b/src/elementaryFunctions/atanh/catanhs.c index 92af66b3..8c975154 100644 --- a/src/elementaryFunctions/atanh/catanhs.c +++ b/src/elementaryFunctions/atanh/catanhs.c @@ -11,8 +11,10 @@ */ #include "atanh.h" +#include "atan.h" floatComplex catanhs(floatComplex z) { - /* FIXME : Let's code... */ - return z; + floatComplex minus_i_z = FloatComplex(cimags(z), -creals(z)); + floatComplex atan_minus_i_z = catans(minus_i_z); + return FloatComplex(-cimags(atan_minus_i_z), creals(atan_minus_i_z)); } |