summaryrefslogtreecommitdiff
path: root/modules/cacsd/macros/projsl.sci
diff options
context:
space:
mode:
authorShashank2017-05-29 12:40:26 +0530
committerShashank2017-05-29 12:40:26 +0530
commit0345245e860375a32c9a437c4a9d9cae807134e9 (patch)
treead51ecbfa7bcd3cc5f09834f1bb8c08feaa526a4 /modules/cacsd/macros/projsl.sci
downloadscilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.tar.gz
scilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.tar.bz2
scilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.zip
CMSCOPE changed
Diffstat (limited to 'modules/cacsd/macros/projsl.sci')
-rwxr-xr-xmodules/cacsd/macros/projsl.sci16
1 files changed, 16 insertions, 0 deletions
diff --git a/modules/cacsd/macros/projsl.sci b/modules/cacsd/macros/projsl.sci
new file mode 100755
index 000000000..77aa6a15e
--- /dev/null
+++ b/modules/cacsd/macros/projsl.sci
@@ -0,0 +1,16 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) INRIA -
+//
+// 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.1-en.txt
+
+function [slp]=projsl(sl,q,m)
+ //slp= projected model of sl q*m is the full rank
+ //factorization of the projection.
+ //!
+
+ slp=syslin(sl(7),m*sl(2)*q,m*sl(3),sl(4)*q,sl(5),m*sl(6))
+endfunction