summaryrefslogtreecommitdiff
path: root/src/auxiliaryFunctions/isnan/zisnans.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/auxiliaryFunctions/isnan/zisnans.c')
-rw-r--r--src/auxiliaryFunctions/isnan/zisnans.c18
1 files changed, 17 insertions, 1 deletions
diff --git a/src/auxiliaryFunctions/isnan/zisnans.c b/src/auxiliaryFunctions/isnan/zisnans.c
index d27117ff..93a60b1c 100644
--- a/src/auxiliaryFunctions/isnan/zisnans.c
+++ b/src/auxiliaryFunctions/isnan/zisnans.c
@@ -1 +1,17 @@
-/* FIXME : Implementation */
+/*
+** -*- C -*-
+**
+** zisnans.c
+** Made by Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on Thu Apr 26 16:02:19 2007 jofret
+** Last update Thu Apr 26 17:36:44 2007 jofret
+**
+** Copyright INRIA 2007
+*/
+
+#include "isnan.h"
+
+bool zisnans(doubleComplex in) {
+ return (isnan(zreals(in)) || isnan(zimags(in)));
+}