summaryrefslogtreecommitdiff
path: root/src/auxiliaryFunctions/isnan/cisnans.c
diff options
context:
space:
mode:
authorjofret2007-05-07 14:12:10 +0000
committerjofret2007-05-07 14:12:10 +0000
commit5e99f6ee73b31f683d5b4fb5f88e1bb0b683a9e8 (patch)
treea62c8792008ff2478b2ab0b3273fa35edac2aaa1 /src/auxiliaryFunctions/isnan/cisnans.c
parentd4c521386b82ea3e29762a845bc4483f57bc056a (diff)
downloadscilab2c-5e99f6ee73b31f683d5b4fb5f88e1bb0b683a9e8.tar.gz
scilab2c-5e99f6ee73b31f683d5b4fb5f88e1bb0b683a9e8.tar.bz2
scilab2c-5e99f6ee73b31f683d5b4fb5f88e1bb0b683a9e8.zip
Is Nan : New function
Must improve nan so far as complex numbers are concerned !
Diffstat (limited to 'src/auxiliaryFunctions/isnan/cisnans.c')
-rw-r--r--src/auxiliaryFunctions/isnan/cisnans.c18
1 files changed, 17 insertions, 1 deletions
diff --git a/src/auxiliaryFunctions/isnan/cisnans.c b/src/auxiliaryFunctions/isnan/cisnans.c
index d27117ff..9aef26f5 100644
--- a/src/auxiliaryFunctions/isnan/cisnans.c
+++ b/src/auxiliaryFunctions/isnan/cisnans.c
@@ -1 +1,17 @@
-/* FIXME : Implementation */
+/*
+** -*- C -*-
+**
+** cisnans.c
+** Made by Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on Thu Apr 26 15:56:35 2007 jofret
+** Last update Mon May 7 15:44:29 2007 jofret
+**
+** Copyright INRIA 2007
+*/
+
+#include "isnan.h"
+
+bool cisnans(floatComplex in) {
+ return (isnan(creals(in)) || isnan(cimags(in)));
+}