summaryrefslogtreecommitdiff
path: root/macros/FunctionAnnotation
diff options
context:
space:
mode:
authorsiddhu89902017-02-02 16:02:41 +0530
committersiddhu89902017-02-02 16:02:41 +0530
commit765d9c44f94634406eeff50e20e8cdfcf1b7699c (patch)
tree25feaba0f050fc3295b7dbfb3c5b6134c920508a /macros/FunctionAnnotation
parenta9bdd75eb989bc302ba98e3b6cb329fceaeb385e (diff)
downloadscilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.tar.gz
scilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.tar.bz2
scilab2c-765d9c44f94634406eeff50e20e8cdfcf1b7699c.zip
Support for function 'schur' added
q
Diffstat (limited to 'macros/FunctionAnnotation')
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_SZ.binbin0 -> 1004 bytes
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_SZ.sci13
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_TP.binbin0 -> 516 bytes
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_TP.sci10
-rw-r--r--macros/FunctionAnnotation/libbin2228 -> 2276 bytes
-rw-r--r--macros/FunctionAnnotation/names2
6 files changed, 25 insertions, 0 deletions
diff --git a/macros/FunctionAnnotation/FA_SCHUR_SZ.bin b/macros/FunctionAnnotation/FA_SCHUR_SZ.bin
new file mode 100644
index 00000000..9d77eae8
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_SCHUR_SZ.bin
Binary files differ
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
diff --git a/macros/FunctionAnnotation/FA_SCHUR_TP.bin b/macros/FunctionAnnotation/FA_SCHUR_TP.bin
new file mode 100644
index 00000000..8b31a0c7
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_SCHUR_TP.bin
Binary files differ
diff --git a/macros/FunctionAnnotation/FA_SCHUR_TP.sci b/macros/FunctionAnnotation/FA_SCHUR_TP.sci
new file mode 100644
index 00000000..a8b68b17
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_SCHUR_TP.sci
@@ -0,0 +1,10 @@
+function out2tp = FA_SCHUR_TP(in2tp)
+
+in2type = string(in2tp);
+
+if(in2type == 'g')
+ out2tp = 'd'
+else
+ out2tp = in2type
+end
+endfunction
diff --git a/macros/FunctionAnnotation/lib b/macros/FunctionAnnotation/lib
index b7b55207..a1a11a90 100644
--- a/macros/FunctionAnnotation/lib
+++ b/macros/FunctionAnnotation/lib
Binary files differ
diff --git a/macros/FunctionAnnotation/names b/macros/FunctionAnnotation/names
index d9ae572a..64cb2574 100644
--- a/macros/FunctionAnnotation/names
+++ b/macros/FunctionAnnotation/names
@@ -9,6 +9,8 @@ FA_MAX
FA_MIN
FA_MUL
FA_REAL
+FA_SCHUR_SZ
+FA_SCHUR_TP
FA_SUB
FA_SZ_1
FA_SZ_2