Added Iscolumn

3 files changed, 53 insertions, 1 deletions

diff --git a/2.3-1/src/c/elementaryFunctions/interfaces/int_iscolumn.h b/2.3-1/src/c/elementaryFunctions/interfaces/int_iscolumn.h
new file mode 100644
index 00000000..f5e8a7de
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/interfaces/int_iscolumn.h
@@ -0,0 +1,26 @@
+ /*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
+*/
+
+
+
+#ifndef __INT_ISCOLUMN_H__
+#define __INT_ISCOLUMN_H__
+
+#define d2iscolumng0(in,size )        discolumna(in, size[1])
+#define d0iscolumng0(in)               discolumns(in)
+#define s2iscolumng0(in,size)        siscolumna(in, size[1])
+#define s0iscolumng0(in)               siscolumns(in)
+#define g2iscolumng0(in,size)         giscolumna(in, size[1])
+#define g0iscolumng0(in)               giscolumns(in)
+#define z2iscolumng0(in,size)         ziscolumna(in , size[1])
+#define z0iscolumng0(in)               ziscolumns(in)
+
+
+#endif
diff --git a/2.3-1/src/c/elementaryFunctions/interfaces/int_ismatrix.h b/2.3-1/src/c/elementaryFunctions/interfaces/int_ismatrix.h
new file mode 100644
index 00000000..56dfc856
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/interfaces/int_ismatrix.h
@@ -0,0 +1,26 @@
+ /*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
+*/
+
+
+
+#ifndef __INT_ISMATRIX_H__
+#define __INT_ISMATRIX_H__
+
+#define d2ismatrixg0(in, size )        dismatrixa(in)
+#define d0ismatrixg0(in)               dismatrixs(in)
+#define s2ismatrixg0(in , size)        sismatrixa(in)
+#define s0ismatrixg0(in)               sismatrixs(in)
+#define g2ismatrixg0(in, size)         gismatrixa(in)
+#define g0ismatrixg0(in)               gismatrixs(in)
+#define z2ismatrixg0(in, size)         zismatrixa(in)
+#define z0ismatrixg0(in)               zismatrixs(in)
+
+
+#endif
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 6ecb145e..cc6be37c 100644
--- a/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h
+++ b/2.3-1/src/c/elementaryFunctions/interfaces/int_isrow.h
@@ -15,7 +15,7 @@
 
 #define d2isrowg0(in, size )        disrowa(in, size[0])
 #define d0isrowg0(in)               disrows(in)
-#define s2isrowg0(in , size)        siswora(in, size[0])
+#define s2isrowg0(in , size)        sisrowa(in, size[0])
 #define s0isrowg0(in)               sisrows(in)
 #define g2isrowg0(in, size)         gisrowa(in, size[0])
 #define g0isrowg0(in)               gisrows(in)