Initial revision

[cln.git] / src / float / dfloat / misc / cl_DF_sign.cc

diff --git a/src/float/dfloat/misc/cl_DF_sign.cc b/src/float/dfloat/misc/cl_DF_sign.cc
new file mode 100644 (file)
index 0000000..643100b
--- /dev/null
+++ b/src/float/dfloat/misc/cl_DF_sign.cc
@@ -0,0 +1,23 @@
+// float_sign().
+
+// General includes.
+#include "cl_sysdep.h"
+
+// Specification.
+#include "cl_dfloat.h"
+
+
+// Implementation.
+
+#include "cl_DF.h"
+
+#undef MAYBE_INLINE
+#define MAYBE_INLINE inline
+#include "cl_DF_minusp.cc"
+
+MAYBE_INLINE2
+const cl_DF float_sign (const cl_DF& x)
+{
+// Methode: x>=0 -> Ergebnis 1.0; x<0 -> Ergebnis -1.0
+       return (!minusp(x) ? cl_DF_1 : cl_DF_minus1);
+}