Added Iscolumn

21 files changed, 499 insertions, 1 deletions

diff --git a/2.3-1/includes/sci2clib.h b/2.3-1/includes/sci2clib.h
index 979e31ab..29961917 100644
--- a/2.3-1/includes/sci2clib.h
+++ b/2.3-1/includes/sci2clib.h
@@ -163,6 +163,12 @@ extern "C" {
 /*interfacing isrow*/
 #include "isrow.h"
 #include "int_isrow.h"
+/*interfacing iscolumn*/
+#include "iscolumn.h"
+#include "int_iscolumn.h"
+/*interfacing ismatrix*/
+#include "ismatrix.h"
+#include "int_ismatrix.h"
 /* interfacing floor */
 #include "floor.h"
 #include "int_floor.h"
diff --git a/2.3-1/jar/scilab_en_US_help.jar b/2.3-1/jar/scilab_en_US_help.jar
index a7468e8b..90b669ab 100644
--- a/2.3-1/jar/scilab_en_US_help.jar
+++ b/2.3-1/jar/scilab_en_US_help.jar
diff --git a/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
index 8d0d91da..81c34c45 100644
--- a/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
+++ b/2.3-1/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
@@ -952,6 +952,102 @@ INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,E
 INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);

 

 // -------------------

+// --- Class Iscolumn. ---

+// -------------------

+ClassName = 'Iscolumn';

+

+// --- Class Annotation. ---

+PrintStringInfo('   Adding Class: '+ClassName+'.',GeneralReport,'file','y');

+ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls);

+PrintStringInfo('NIN=          1',ClassFileName,'file','y');

+PrintStringInfo('NOUT=         1       ',ClassFileName,'file','y');

+//Was FA_TP_USER

+//Cause some trouble if user specify some precision and if input(and also output) is complex.

+PrintStringInfo('OUT(1).TP=   ''g''',ClassFileName,'file','y'); 

+PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y');

+PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y');

+//---Function list class. ----

+ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls);

+PrintStringInfo('d0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('d2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z0'+ArgSeparator+'g0',ClassFileName,'file','y');

+

+// --- Annotation Function And Function List Function. ---

+FunctionName = 'iscolumn';

+PrintStringInfo('      Adding Function: '+FunctionName+'.',GeneralReport,'file','y');

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun);

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);

+// -------------------

+// --- Class Ismatrix. ---

+// -------------------

+ClassName = 'Ismatrix';

+

+// --- Class Annotation. ---

+PrintStringInfo('   Adding Class: '+ClassName+'.',GeneralReport,'file','y');

+ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls);

+PrintStringInfo('NIN=          1',ClassFileName,'file','y');

+PrintStringInfo('NOUT=         1       ',ClassFileName,'file','y');

+//Was FA_TP_USER

+//Cause some trouble if user specify some precision and if input(and also output) is complex.

+PrintStringInfo('OUT(1).TP=   ''g''',ClassFileName,'file','y'); 

+PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y');

+PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y');

+//---Function list class. ----

+ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls);

+PrintStringInfo('d0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('d2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z0'+ArgSeparator+'g0',ClassFileName,'file','y');

+

+// --- Annotation Function And Function List Function. ---

+FunctionName = 'ismatrix';

+PrintStringInfo('      Adding Function: '+FunctionName+'.',GeneralReport,'file','y');

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun);

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);

+

+// -------------------

+// --- Class Ismatrix. ---

+// -------------------

+ClassName = 'Ismatrix';

+

+// --- Class Annotation. ---

+PrintStringInfo('   Adding Class: '+ClassName+'.',GeneralReport,'file','y');

+ClassFileName = fullfile(SCI2CLibCAnnClsDir,ClassName+ExtensionCAnnCls);

+PrintStringInfo('NIN=          1',ClassFileName,'file','y');

+PrintStringInfo('NOUT=         1       ',ClassFileName,'file','y');

+//Was FA_TP_USER

+//Cause some trouble if user specify some precision and if input(and also output) is complex.

+PrintStringInfo('OUT(1).TP=   ''g''',ClassFileName,'file','y'); 

+PrintStringInfo('OUT(1).SZ(1)= ''1''',ClassFileName,'file','y');

+PrintStringInfo('OUT(1).SZ(2)= ''1''',ClassFileName,'file','y');

+//---Function list class. ----

+ClassFileName = fullfile(SCI2CLibCFLClsDir,ClassName+ExtensionCFuncListCls);

+PrintStringInfo('d0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('d2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('s0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('g0'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z2'+ArgSeparator+'g0',ClassFileName,'file','y');

+PrintStringInfo('z0'+ArgSeparator+'g0',ClassFileName,'file','y');

+

+// --- Annotation Function And Function List Function. ---

+FunctionName = 'ismatrix';

+PrintStringInfo('      Adding Function: '+FunctionName+'.',GeneralReport,'file','y');

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun);

+INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);

+

+

+// -------------------

 // --- Class Isreal. ---

 // -------------------

 ClassName = 'Isreal';

diff --git a/2.3-1/macros/findDeps/getAllHeaders.sci b/2.3-1/macros/findDeps/getAllHeaders.sci
index bb7aeb22..021b7e4d 100644
--- a/2.3-1/macros/findDeps/getAllHeaders.sci
+++ b/2.3-1/macros/findDeps/getAllHeaders.sci
@@ -128,6 +128,8 @@ function allHeaders = getAllHeaders(SharedInfo)
       "src/c/elementaryFunctions/includes/asecd.h"
       "src/c/elementaryFunctions/includes/asech.h"
       "src/c/elementaryFunctions/includes/isrow.h"
+      "src/c/elementaryFunctions/includes/iscolumn.h"
+      "src/c/elementaryFunctions/includes/ismatrix.h"
       "src/c/elementaryFunctions/includes/asind.h"
       "src/c/elementaryFunctions/includes/atand.h"
       "src/c/statisticsFunctions/includes/variance.h"
diff --git a/2.3-1/macros/findDeps/getAllInterfaces.sci b/2.3-1/macros/findDeps/getAllInterfaces.sci
index 44ebc8f6..27ae65dd 100644
--- a/2.3-1/macros/findDeps/getAllInterfaces.sci
+++ b/2.3-1/macros/findDeps/getAllInterfaces.sci
@@ -99,6 +99,8 @@ function allInterfaces = getAllInterfaces(SharedInfo)
       "src/c/elementaryFunctions/interfaces/int_bitget.h"
       "src/c/elementaryFunctions/interfaces/int_linspace.h"
       "src/c/elementaryFunctions/interfaces/int_isrow.h"
+      "src/c/elementaryFunctions/interfaces/int_iscolumn.h"
+      "src/c/elementaryFunctions/interfaces/int_ismatrix.h"
       "src/c/elementaryFunctions/interfaces/int_logspace.h"
       "src/c/elementaryFunctions/interfaces/int_cosh.h"
       "src/c/elementaryFunctions/interfaces/int_uint8.h"
diff --git a/2.3-1/macros/findDeps/getAllSources.sci b/2.3-1/macros/findDeps/getAllSources.sci
index 132d026b..17e35c25 100644
--- a/2.3-1/macros/findDeps/getAllSources.sci
+++ b/2.3-1/macros/findDeps/getAllSources.sci
@@ -772,6 +772,22 @@ function allSources = getAllSources(SharedInfo)
       "src/c/elementaryFunctions/isrow/sisrowa.c"
       "src/c/elementaryFunctions/isrow/zisrowa.c"
       "src/c/elementaryFunctions/isrow/zisrows.c"
+      "src/c/elementaryFunctions/iscolumn/discolumna.c"
+      "src/c/elementaryFunctions/iscolumn/discolumns.c"
+      "src/c/elementaryFunctions/iscolumn/giscolumns.c"
+      "src/c/elementaryFunctions/iscolumn/giscolumna.c"
+      "src/c/elementaryFunctions/iscolumn/siscolumns.c" 
+      "src/c/elementaryFunctions/iscolumn/siscolumna.c"
+      "src/c/elementaryFunctions/iscolumn/ziscolumna.c"
+      "src/c/elementaryFunctions/iscolumn/ziscolumns.c"
+      "src/c/elementaryFunctions/ismatrix/dismatrixa.c"
+      "src/c/elementaryFunctions/ismatrix/dismatrixs.c"
+      //"src/c/elementaryFunctions/ismatrix/gismatrixs.c"
+      //"src/c/elementaryFunctions/ismatrix/gismatrixa.c"
+      //"src/c/elementaryFunctions/ismatrix/sismatrixs.c" 
+      //"src/c/elementaryFunctions/ismatrix/sismatrixa.c"
+      //"src/c/elementaryFunctions/ismatrix/zismatrixa.c"
+      //"src/c/elementaryFunctions/ismatrix/zismatrixs.c"  
       "src/c/elementaryFunctions/acscd/dacscda.c"
       "src/c/elementaryFunctions/acscd/dacscds.c"
       "src/c/elementaryFunctions/acscd/sacscda.c"
diff --git a/2.3-1/src/c/elementaryFunctions/includes/iscolumn.h b/2.3-1/src/c/elementaryFunctions/includes/iscolumn.h
new file mode 100644
index 00000000..ac1de9db
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/includes/iscolumn.h
@@ -0,0 +1,38 @@
+/* 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
+*/
+
+#ifndef __ISCOLUMN_H__
+#define __ISCOLUMN_H__
+
+
+#include "types.h"
+#include "doubleComplex.h"
+#include "floatComplex.h"
+
+#ifdef  __cplusplus
+extern "C" {
+#endif
+
+char discolumna(double* , int);
+char discolumns(double);
+char siscolumna( float* , int);
+char siscolumns( float);
+char giscolumna(char* , int);
+char giscolumns(char);
+char ziscolumna(doubleComplex*, int);
+char ziscolumns(doubleComplex);
+
+#ifdef  __cplusplus
+} /* extern "C" */
+#endif
+
+#endif
diff --git a/2.3-1/src/c/elementaryFunctions/includes/ismatrix.h b/2.3-1/src/c/elementaryFunctions/includes/ismatrix.h
new file mode 100644
index 00000000..072bfdcb
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/includes/ismatrix.h
@@ -0,0 +1,38 @@
+/* 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
+*/
+
+#ifndef __ISMATRIX_H__
+#define __ISMATRIX_H__
+
+
+#include "types.h"
+#include "doubleComplex.h"
+#include "floatComplex.h"
+
+#ifdef  __cplusplus
+extern "C" {
+#endif
+
+char dismatrixa(double*);
+char dismatrixs(double);
+char sismatrixa(float*);
+char sismatrixs(float);
+char gismatrixa(char*);
+char gismatrixs(char);
+char zismatrixa(doubleComplex*);
+char zismatrixs(doubleComplex);
+
+#ifdef  __cplusplus
+} /* extern "C" */
+#endif
+
+#endif
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)
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/discolumna.c b/2.3-1/src/c/elementaryFunctions/iscolumn/discolumna.c
new file mode 100644
index 00000000..8bebfcad
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/discolumna.c
@@ -0,0 +1,26 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+char discolumna(double* inp, int size1)
+{
+   char out= 'F' ;
+    if(size1==1)
+    {
+     out  = 'T';
+    }
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/discolumns.c b/2.3-1/src/c/elementaryFunctions/iscolumn/discolumns.c
new file mode 100644
index 00000000..b81074b5
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/discolumns.c
@@ -0,0 +1,24 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+
+char discolumns(double inp)
+{
+   char out='T';
+   
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumna.c b/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumna.c
new file mode 100644
index 00000000..db6ff431
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumna.c
@@ -0,0 +1,27 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+#include "string.h"
+char giscolumna(char *inp, int size1)
+{
+   char out='F';
+    if(size1==1)
+    {
+     out  = 'T';
+    }
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumns.c b/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumns.c
new file mode 100644
index 00000000..57b93e95
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/giscolumns.c
@@ -0,0 +1,24 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+
+char giscolumns(char inp)
+{
+   char out='T';
+   
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumna.c b/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumna.c
new file mode 100644
index 00000000..ed4ee5b9
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumna.c
@@ -0,0 +1,26 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+char siscolumna(float* inp, int size1)
+{
+   char out='F';
+    if(size1==1)
+    {
+     out  = 'T';
+    }
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumns.c b/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumns.c
new file mode 100644
index 00000000..ebb89e11
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/siscolumns.c
@@ -0,0 +1,24 @@
+/* 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 "iscolumn.h"
+#include "types.h"
+
+char siscolumns(float inp)
+{
+   char out='T';
+   
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumna.c b/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumna.c
new file mode 100644
index 00000000..a1aca1bf
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumna.c
@@ -0,0 +1,28 @@
+/* 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 "doubleComplex.h"
+#include "iscolumn.h"
+#include "types.h"
+
+char ziscolumna(doubleComplex *inp, int size1)
+{
+    char out='F';
+    if(size1==1)
+    {
+     out  = 'T';
+    }
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumns.c b/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumns.c
new file mode 100644
index 00000000..f1d28508
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/iscolumn/ziscolumns.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 "iscolumn.h"
+#include "types.h"
+#include "doubleComplex.h"
+
+char ziscolumns(doubleComplex inp)
+{
+   char out='T';
+   
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixa.c b/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixa.c
new file mode 100644
index 00000000..4fe7d192
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixa.c
@@ -0,0 +1,22 @@
+/* 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 "ismatrix.h"
+#include "types.h"
+char dismatrixa(double* in)
+{
+   char out= 'T' ;
+    return out;
+}
diff --git a/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixs.c b/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixs.c
new file mode 100644
index 00000000..f1c99dc4
--- /dev/null
+++ b/2.3-1/src/c/elementaryFunctions/ismatrix/dismatrixs.c
@@ -0,0 +1,22 @@
+/* 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 "ismatrix.h"
+#include "types.h"
+char dismatrixs(double in)
+{
+   char out= 'F' ;
+    return out;
+}