summaryrefslogtreecommitdiff
path: root/2.3-1/src/c/elementaryFunctions
diff options
context:
space:
mode:
Diffstat (limited to '2.3-1/src/c/elementaryFunctions')
-rw-r--r--2.3-1/src/c/elementaryFunctions/includes/isrow.h3
-rw-r--r--2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h1
-rw-r--r--2.3-1/src/c/elementaryFunctions/isrow/zisrows.c25
3 files changed, 28 insertions, 1 deletions
diff --git a/2.3-1/src/c/elementaryFunctions/includes/isrow.h b/2.3-1/src/c/elementaryFunctions/includes/isrow.h
index 5c010633..8c9f7ced 100644
--- a/2.3-1/src/c/elementaryFunctions/includes/isrow.h
+++ b/2.3-1/src/c/elementaryFunctions/includes/isrow.h
@@ -28,7 +28,8 @@ char sisrowa( float* , int);
char sisrows( float);
char gisrowa(char* , int);
char gisrows(char);
-char zisrowa(doubleComplex *inp, int);
+char zisrowa(doubleComplex*, int);
+char zisrows(doubleComplex);
#ifdef __cplusplus
} /* extern "C" */
diff --git a/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h b/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h
index af718b4a..6ecb145e 100644
--- a/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h
+++ b/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h
@@ -20,6 +20,7 @@
#define g2isrowg0(in, size) gisrowa(in, size[0])
#define g0isrowg0(in) gisrows(in)
#define z2isrowg0(in, size) zisrowa(in , size[0])
+#define z0isrowg0(in) zisrows(in)
#endif
diff --git a/2.3-1/src/c/elementaryFunctions/isrow/zisrows.c b/2.3-1/src/c/elementaryFunctions/isrow/zisrows.c
new file mode 100644
index 00000000..96e671ab
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/isrow/zisrows.c
@@ -0,0 +1,25 @@
+/* Copyright (C) 2016 - IIT Bombay - FOSSEE
+
+ This file must be used under the terms of the CeCILL.
+ This source file is licensed as described in the file COPYING, which
+ you should have received as part of this distribution. The terms
+ are also available at
+ http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ Author: Abhinav Dronamraju
+ Organization: FOSSEE, IIT Bombay
+ Email: toolbox@scilab.in
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+#include "isrow.h"
+#include "types.h"
+#include "doubleComplex.h"
+
+char zisrows(doubleComplex inp)
+{
+ char out='T';
+
+ return out;
+}