summaryrefslogtreecommitdiff
path: root/macros/FunctionAnnotation/FA_SCHUR_TP.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/FunctionAnnotation/FA_SCHUR_TP.sci')
-rw-r--r--macros/FunctionAnnotation/FA_SCHUR_TP.sci10
1 files changed, 10 insertions, 0 deletions
diff --git a/macros/FunctionAnnotation/FA_SCHUR_TP.sci b/macros/FunctionAnnotation/FA_SCHUR_TP.sci
new file mode 100644
index 0000000..a8b68b1
--- /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