From 38419db1635e0e498d6937ace677de266b764306 Mon Sep 17 00:00:00 2001
From: torset
Date: Wed, 4 Feb 2009 14:22:40 +0000
Subject: Update
---
src/auxiliaryFunctions/isempty/zisemptya.c | 14 ++------------
1 file changed, 2 insertions(+), 12 deletions(-)
(limited to 'src/auxiliaryFunctions/isempty/zisemptya.c')
diff --git a/src/auxiliaryFunctions/isempty/zisemptya.c b/src/auxiliaryFunctions/isempty/zisemptya.c
index d6c64b29..218e6da3 100644
--- a/src/auxiliaryFunctions/isempty/zisemptya.c
+++ b/src/auxiliaryFunctions/isempty/zisemptya.c
@@ -11,20 +11,10 @@
*/
#include "isempty.h"
+#include "length.h"
double zisemptya(doubleComplex* x, int size) {
- double* out;
- int indiceOut[2]={0};
- out = malloc((uint)size*sizeof(double));
-
- zfinda(x, size, out, indiceOut);
-
- if ( out[0] == -1 /*ie tab=NULL*/) {
- free(out);
- return 1;
- }
+ return (size==0) ? 1.0 : 0.0;
- free(out);
- return 0;
}
--
cgit