summaryrefslogtreecommitdiff
path: root/src/util
diff options
context:
space:
mode:
authoreschnett <eschnett@17b73243-c579-4c4c-a9d2-2d5706c11dac>2012-10-23 20:21:21 +0000
committereschnett <eschnett@17b73243-c579-4c4c-a9d2-2d5706c11dac>2012-10-23 20:21:21 +0000
commitdb5c9b0b1c59082727cfd1f3c297941cc9ce58af (patch)
treed83af79972c9ce031d0f4a979060b4c8a9c4bd65 /src/util
parentcae50f1f5dc23495fe4568b3cdbe14ca147ff621 (diff)
List --exit-after-param-check in help text
git-svn-id: http://svn.cactuscode.org/flesh/trunk@4885 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/util')
-rw-r--r--src/util/Math.c55
1 files changed, 55 insertions, 0 deletions
diff --git a/src/util/Math.c b/src/util/Math.c
index 0d4dccf0..7ce8d680 100644
--- a/src/util/Math.c
+++ b/src/util/Math.c
@@ -11,6 +11,7 @@
#include <math.h>
#include <cctk_Config.h>
+#include <cctk_Math.h>
@@ -23,6 +24,14 @@ double CCTK_copysign(double x, double y)
#endif
}
+double CCTK_FNAME(CCTK_copysign)(double *x, double *y);
+double CCTK_FNAME(CCTK_copysign)(double *x, double *y)
+{
+ return CCTK_copysign(*x, *y);
+}
+
+
+
int CCTK_fpclassify(double x)
{
#ifdef HAVE_FPCLASSIFY
@@ -32,6 +41,14 @@ int CCTK_fpclassify(double x)
#endif
}
+int CCTK_FNAME(CCTK_fpclassify)(double *x);
+int CCTK_FNAME(CCTK_fpclassify)(double *x)
+{
+ return CCTK_fpclassify(*x);
+}
+
+
+
int CCTK_isfinite(double x)
{
#ifdef HAVE_ISFINITE
@@ -41,6 +58,14 @@ int CCTK_isfinite(double x)
#endif
}
+int CCTK_FNAME(CCTK_isfinite)(double *x);
+int CCTK_FNAME(CCTK_isfinite)(double *x)
+{
+ return CCTK_isfinite(*x);
+}
+
+
+
int CCTK_isinf(double x)
{
#ifdef HAVE_ISINF
@@ -50,6 +75,14 @@ int CCTK_isinf(double x)
#endif
}
+int CCTK_FNAME(CCTK_isinf)(double *x);
+int CCTK_FNAME(CCTK_isinf)(double *x)
+{
+ return CCTK_isinf(*x);
+}
+
+
+
int CCTK_isnan(double x)
{
#ifdef HAVE_ISNAN
@@ -59,6 +92,14 @@ int CCTK_isnan(double x)
#endif
}
+int CCTK_FNAME(CCTK_isnan)(double *x);
+int CCTK_FNAME(CCTK_isnan)(double *x)
+{
+ return CCTK_isnan(*x);
+}
+
+
+
int CCTK_isnormal(double x)
{
#ifdef HAVE_ISNORMAL
@@ -68,6 +109,14 @@ int CCTK_isnormal(double x)
#endif
}
+int CCTK_FNAME(CCTK_isnormal)(double *x);
+int CCTK_FNAME(CCTK_isnormal)(double *x)
+{
+ return CCTK_isnormal(*x);
+}
+
+
+
int CCTK_signbit(double x)
{
#ifdef HAVE_SIGNBIT
@@ -76,3 +125,9 @@ int CCTK_signbit(double x)
return x < 0.0;
#endif
}
+
+int CCTK_FNAME(CCTK_signbit)(double *x);
+int CCTK_FNAME(CCTK_signbit)(double *x)
+{
+ return CCTK_signbit(*x);
+}