diff options
Diffstat (limited to 'modules/cacsd/macros/projsl.sci')
| -rwxr-xr-x | modules/cacsd/macros/projsl.sci | 16 |
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 |