]> www.ginac.de Git - cln.git/blobdiff - src/float/transcendental/cl_LF_coshsinh.cc
Finalize CLN 1.3.7 release.
[cln.git] / src / float / transcendental / cl_LF_coshsinh.cc
index 7a926b7a40ebead9896c24d539b648dd969a0c40..2e89ded7fafed00c4b4f19c45a2a88aa839d9552 100644 (file)
@@ -1,16 +1,16 @@
 // cl_coshsinh_ratseries().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
-#include "cl_F_tran.h"
+#include "float/transcendental/cl_F_tran.h"
 
 
 // Implementation.
 
 #include "cln/lfloat.h"
-#include "cl_LF.h"
+#include "float/lfloat/cl_LF.h"
 #include "cln/integer.h"
 
 namespace cln {
@@ -29,7 +29,7 @@ const cl_LF_cosh_sinh_t cl_coshsinh_ratseries (const cl_LF& x)
        var uintE lq = cl_I_to_UE(- x_.exponent);
        var const cl_I& p = x_.mantissa;
        // Compute sinh(p/2^lq) and cosh(p/2^lq) by splitting into pieces.
-       var cl_boolean first_factor = cl_true;
+       var bool first_factor = true;
        var cl_LF_cosh_sinh_t product;
        var uintE b1;
        var uintE b2;
@@ -44,7 +44,7 @@ const cl_LF_cosh_sinh_t cl_coshsinh_ratseries (const cl_LF& x)
                        var cl_LF_cosh_sinh_t factor = cl_coshsinh_aux(pk,lqk,len);
                        if (first_factor) {
                                product = factor;
-                               first_factor = cl_false;
+                               first_factor = false;
                        } else
                                product = product * factor;
                }