Extend the exponent range from 32 bits to 64 bits on selected platforms.

[cln.git] / src / complex / transcendental / cl_C_sinh.cc

diff --git a/src/complex/transcendental/cl_C_sinh.cc b/src/complex/transcendental/cl_C_sinh.cc
index b7ba4b9fbd1bd6c7df4bd86d61d443474985e344..7b426c427974509789d5f1df4613dfda3d20ebc4 100644 (file)
--- a/src/complex/transcendental/cl_C_sinh.cc
+++ b/src/complex/transcendental/cl_C_sinh.cc
@@ -4,13 +4,15 @@
 #include "cl_sysdep.h"
 
 // Specification.
-#include "cl_complex.h"
+#include "cln/complex.h"
 
 
 // Implementation.
 
 #include "cl_C.h"
-#include "cl_real.h"
+#include "cln/real.h"
+
+namespace cln {
 
 const cl_N sinh (const cl_N& x)
 {
@@ -25,8 +27,8 @@ const cl_N sinh (const cl_N& x)
                // x=a+bi
                var const cl_R& a = realpart(x);
                var const cl_R& b = imagpart(x);
-               var cl_cosh_sinh_t hyp_a = cl_cosh_sinh(a); // cosh(a), sinh(a) errechnen
-               var cl_cos_sin_t trig_b = cl_cos_sin(b); // cos(b), sin(b) errechnen
+               var cosh_sinh_t hyp_a = cosh_sinh(a); // cosh(a), sinh(a) errechnen
+               var cos_sin_t trig_b = cos_sin(b); // cos(b), sin(b) errechnen
                // Da b nicht = Fixnum 0 ist, ist auch sin(b) nicht = Fixnum 0.
                // cosh(a) /= Fixnum 0.
                return complex_C(hyp_a.sinh * trig_b.cos, // sinh(a)*cos(b)
@@ -34,3 +36,5 @@ const cl_N sinh (const cl_N& x)
                                );
        }
 }
+
+}  // namespace cln