summaryrefslogtreecommitdiff
path: root/macros/FunctionAnnotation/FA_SCHUR_SZ.sci
diff options
context:
space:
mode:
authorsiddhu89902017-02-02 16:02:41 +0530
committersiddhu89902017-02-02 16:02:41 +0530
commit765d9c44f94634406eeff50e20e8cdfcf1b7699c (patch)
tree25feaba0f050fc3295b7dbfb3c5b6134c920508a /macros/FunctionAnnotation/FA_SCHUR_SZ.sci
parenta9bdd75eb989bc302ba98e3b6cb329fceaeb385e (diff)
downloadscilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.tar.gz
scilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.tar.bz2
scilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.zip
Support for function 'schur' added
q
Diffstat (limited to 'macros/FunctionAnnotation/FA_SCHUR_SZ.sci')
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_SZ.sci13
1 files changed, 13 insertions, 0 deletions
diff --git a/macros/FunctionAnnotation/FA_SCHUR_SZ.sci b/macros/FunctionAnnotation/FA_SCHUR_SZ.sci
new file mode 100644
index 00000000..6ae20305
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_SCHUR_SZ.sci
@@ -0,0 +1,13 @@
+function out2sz = FA_SCHUR_SZ(in2tp,in1sz)
+
+in2type = string(in2tp);
+in1sz = string(in1sz);
+in1dim = eval(in1sz);
+
+if(in2type == 'g')
+ out2sz = '1'
+else
+ out2sz = string(in1dim)
+end
+
+endfunction