diff options
Diffstat (limited to 'macros/FunctionAnnotation/FA_SCHUR_SZ.sci')
| -rw-r--r-- | macros/FunctionAnnotation/FA_SCHUR_SZ.sci | 13 |
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 0000000..6ae2030 --- /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 |