]> www.ginac.de Git - cln.git/blobdiff - src/float/transcendental/cl_F_exp1_f.cc
Finalize CLN 1.3.7 release.
[cln.git] / src / float / transcendental / cl_F_exp1_f.cc
index 2c09b640cb132bf0888ff36d3cbf99778cad6451..14469f3e3e4c054813620127e9c1460a0cb72659 100644 (file)
@@ -1,23 +1,27 @@
-// cl_exp1().
+// exp1().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
-#include "cl_float.h"
+#include "cln/float.h"
 
 
 // Implementation.
 
-#include "cl_F_tran.h"
-#include "cl_F.h"
+#include "float/transcendental/cl_F_tran.h"
+#include "float/cl_F.h"
 
-const cl_F cl_exp1 (cl_float_format_t f)
+namespace cln {
+
+const cl_F exp1 (float_format_t f)
 {
-       floatformatcase((uintL)f
-       ,       return cl_SF_exp1;
-       ,       return cl_FF_exp1;
-       ,       return cl_DF_exp1;
-       ,       return cl_exp1(len);
+       floatformatcase((uintC)f
+       ,       return cl_SF_exp1();
+       ,       return cl_FF_exp1();
+       ,       return cl_DF_exp1();
+       ,       return exp1(len);
        );
 }
+
+}  // namespace cln