summaryrefslogtreecommitdiff
path: root/2.3-1/macros/FunctionAnnotation
diff options
context:
space:
mode:
authorsiddhu89902017-02-02 16:02:41 +0530
committersiddhu89902017-02-02 16:02:41 +0530
commit1fef9b1edc2d4400e8ba6bb6fafb648963d6817d (patch)
treee1f37ced7b25b855d327895c3932e051232606a1 /2.3-1/macros/FunctionAnnotation
parent28d16508c39756d1f143b44c33115530fd4a7653 (diff)
downloadScilab2C-1fef9b1edc2d4400e8ba6bb6fafb648963d6817d.tar.gz
Scilab2C-1fef9b1edc2d4400e8ba6bb6fafb648963d6817d.tar.bz2
Scilab2C-1fef9b1edc2d4400e8ba6bb6fafb648963d6817d.zip
Support for function 'schur' added
q
Diffstat (limited to '2.3-1/macros/FunctionAnnotation')
-rw-r--r--2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.binbin0 -> 1004 bytes
-rw-r--r--2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.sci13
-rw-r--r--2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.binbin0 -> 516 bytes
-rw-r--r--2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.sci10
-rw-r--r--2.3-1/macros/FunctionAnnotation/libbin2228 -> 2276 bytes
-rw-r--r--2.3-1/macros/FunctionAnnotation/names2
6 files changed, 25 insertions, 0 deletions
diff --git a/2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.bin b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.bin
new file mode 100644
index 00000000..9d77eae8
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.bin
Binary files differ
diff --git a/2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.sci b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_SZ.sci
new file mode 100644
index 00000000..6ae20305
--- /dev/null
+++ b/2.3-1/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/2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.bin b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.bin
new file mode 100644
index 00000000..8b31a0c7
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.bin
Binary files differ
diff --git a/2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.sci b/2.3-1/macros/FunctionAnnotation/FA_SCHUR_TP.sci
new file mode 100644
index 00000000..a8b68b17
--- /dev/null
+++ b/2.3-1/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/2.3-1/macros/FunctionAnnotation/lib b/2.3-1/macros/FunctionAnnotation/lib
index b7b55207..a1a11a90 100644
--- a/2.3-1/macros/FunctionAnnotation/lib
+++ b/2.3-1/macros/FunctionAnnotation/lib
Binary files differ
diff --git a/2.3-1/macros/FunctionAnnotation/names b/2.3-1/macros/FunctionAnnotation/names
index d9ae572a..64cb2574 100644
--- a/2.3-1/macros/FunctionAnnotation/names
+++ b/2.3-1/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