3 files changed, 68 insertions, 18 deletions
diff --git a/src/c/CACSD/interfaces/int_lqe.h b/src/c/CACSD/interfaces/int_lqe.h
new file mode 100644
index 00000000..d801bf3e
--- /dev/null
+++ b/src/c/CACSD/interfaces/int_lqe.h
@@ -0,0 +1,25 @@
+ /* Copyright (C) 2017 - 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: Siddhesh Wani
+ Organization: FOSSEE, IIT Bombay
+ Email: toolbox@scilab.in
+ */
+#ifndef __INT_LQE_H__
+#define __INT_LQE_H__
+
+#ifdef  __cplusplus
+extern "C" {
+#endif
+
+#define ss2lqed2d2(in1,size1,out1,out2) dlqea(in1,size1[0],size1[1],out1,out2);
+
+#ifdef  __cplusplus
+} /* extern "C" */
+#endif
+
+#endif /*__INT_LQE_H__*/
diff --git a/src/c/CACSD/interfaces/int_lqr.h b/src/c/CACSD/interfaces/int_lqr.h
new file mode 100644
index 00000000..e6f534fc
--- /dev/null
+++ b/src/c/CACSD/interfaces/int_lqr.h
@@ -0,0 +1,25 @@
+ /* Copyright (C) 2017 - 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: Siddhesh Wani
+ Organization: FOSSEE, IIT Bombay
+ Email: toolbox@scilab.in
+ */
+#ifndef __INT_LQR_H__
+#define __INT_LQR_H__
+
+#ifdef  __cplusplus
+extern "C" {
+#endif
+
+#define ss2lqrd2d2(in1,size1,out1,out2) dlqra(in1,size1[0],size1[1],out1,out2);
+
+#ifdef  __cplusplus
+} /* extern "C" */
+#endif
+
+#endif /*__INT_LQR_H__*/
diff --git a/src/c/CACSD/interfaces/int_syslin.h b/src/c/CACSD/interfaces/int_syslin.h
index 2327c383..3f74ea6e 100644
--- a/src/c/CACSD/interfaces/int_syslin.h
+++ b/src/c/CACSD/interfaces/int_syslin.h
@@ -18,57 +18,57 @@ extern "C" {
 #endif
 
 #define g2d2d2d2syslinss2(in1,size1,in2,size2,in3,size3,in4,size4,out) \
-	dsyslina(in2,size2[0],in3,size3[1],in4,size4[0],NULL,NULL,out)
+	dsyslina(in1,in2,size2[0],in3,size3[1],in4,size4[0],NULL,NULL,out)
 
 #define g2d2d2d2d2syslinss2(in1,size1,in2,size2,in3,size3,in4,size4,in5, \
-	size5,out)	dsyslina(in2,size2[0],in3,size3[1],in4,size4[0],in5,NULL,out)
+	size5,out)	dsyslina(in1,in2,size2[0],in3,size3[1],in4,size4[0],in5,NULL,out)
 
 #define g2d2d2d2d2d2syslinss2(in1,size1,in2,size2,in3,size3,in4,size4, \
- 	in5,size5,in6,size6,out)	dsyslina(in2,size2[0],in3,size3[1],in4, \
+ 	in5,size5,in6,size6,out)	dsyslina(in1,in2,size2[0],in3,size3[1],in4, \
  	size4[0],in5,in6,out)
 //
 #define g2d0d0d0syslinss2(in1,size1,in2,in3,in4,out) \
-	dsyslina(in2,1,in3,1,in4,1,NULL,NULL,out)
+	dsyslina(in1,&in2,1,&in3,1,&in4,1,NULL,NULL,out)
 
 #define g2d0d2d0syslinss2(in1,size1,in2,in3,size3,in4,out) \
-	dsyslina(in2,1,in3,size3[1],in4,1,NULL,NULL,out)
+	dsyslina(in1,&in2,1,in3,size3[1],&in4,1,NULL,NULL,out)
 
 #define g2d0d0d2syslinss2(in1,size1,in2,in3,in4,size4,out) \
-	dsyslina(in2,1,in3,1,in4,size4[0],NULL,NULL,out)
+	dsyslina(in1,&in2,1,&in3,1,in4,size4[0],NULL,NULL,out)
 
 #define g2d0d2d2syslinss2(in1,size1,in2,in3,size3,in4,size4,out) \
-	dsyslina(in2,1,in3,size3[1],in4,size4[0],NULL,NULL,out)
+	dsyslina(in1,&in2,1,in3,size3[1],in4,size4[0],NULL,NULL,out)
 //
 #define g2d0d0d0d0syslinss2(in1,size1,in2,in3,in4,in5,out) \
-	dsyslina(in2,1,in3,1,in4,1,in5,NULL,out)
+	dsyslina(in1,&in2,1,&in3,1,&in4,1,&in5,NULL,out)
 
 #define g2d0d2d0d2syslinss2(in1,size1,in2,in3,size3,in4,in5,size5, \
-	out) dsyslina(in2,1,in3,size3[1],in4,1,in5,NULL,out)
+	out) dsyslina(in1,&in2,1,in3,size3[1],&in4,1,&in5,NULL,out)
 
 #define g2d0d0d2d2syslinss2(in1,size1,in2,in3,in4,size4,in5,size5, \
-	out) dsyslina(in2,1,in3,1,in4,size4[0],in5,NULL,out)
+	out) dsyslina(in1,&in2,1,&in3,1,in4,size4[0],in5,NULL,out)
 
 #define g2d0d2d2d2syslinss2(in1,size1,in2,in3,size3,in4,size4,in5, \
-	size5, out) dsyslina(in2,1,in3,size3[1],in4,size4[0],in5,NULL,out)
+	size5, out) dsyslina(in1,&in2,1,in3,size3[1],in4,size4[0],in5,NULL,out)
 
 #define g2d2d2d2d0syslinss2(in1,size1,in2,size2,in3,size3,in4,size4, \
-	in5,out) dsyslina(in2,size2[0],in3,size3[1],in4,size4[0],in5,NULL,out)
+	in5,out) dsyslina(in1,in2,size2[0],in3,size3[1],in4,size4[0],&in5,NULL,out)
 //
 #define g2d0d0d0d0d0syslinss2(in1,size1,in2,in3,in4,in5,in6,out) \
-	dsyslina(in2,1,in3,1,in4,1,in5,in6,out)
+	dsyslina(in1,&in2,1,&in3,1,&in4,1,&in5,&in6,out)
 
 #define g2d0d2d0d2d0syslinss2(in1,size1,in2,in3,size3,in4,in5,size5, \
-	in6,out) dsyslina(in2,1,in3,size3[1],in4,1,in5,in6,out)
+	in6,out) dsyslina(in1,&in2,1,in3,size3[1],in4,1,in5,&in6,out)
 
 #define g2d0d0d2d2d0syslinss2(in1,size1,in2,in3,in4,size4,in5,size5, \
-	in6,out) dsyslina(in2,1,in3,1,in4,size4[0],in5,in6,out)
+	in6,out) dsyslina(in1,&in2,1,in3,1,in4,size4[0],in5,&in6,out)
 
 #define g2d0d2d2d2d0syslinss2(in1,size1,in2,in3,size3,in4,size4,in5, \
-	size5,in6,out) dsyslina(in2,1,in3,size3[1],in4,size4[0],in5,in6,out)
+	size5,in6,out) dsyslina(in1,&in2,1,in3,size3[1],in4,size4[0],in5,&in6,out)
 
 #define g2d2d2d2d0d2syslinss2(in1,size1,in2,size2,in3,size3,in4,size4, \
-	in5,in6,size6,out) dsyslina(in2,size2[0],in3,size3[1],in4,size4[0], \
-	in5,in6,out)
+	in5,in6,size6,out) dsyslina(in1,in2,size2[0],in3,size3[1],in4,size4[0], \
+	&in5,in6,out)
 
 #ifdef  __cplusplus
 } /* extern "C" */