summaryrefslogtreecommitdiff
path: root/2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci
diff options
context:
space:
mode:
Diffstat (limited to '2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci')
-rw-r--r--2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci17
1 files changed, 17 insertions, 0 deletions
diff --git a/2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci b/2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci
new file mode 100644
index 00000000..80c0f956
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci
@@ -0,0 +1,17 @@
+function outsize = FA_SZ_OBSCNT(inval,insz1,insz2,nout)
+
+ inval = eval(inval);
+ insz1 = eval(insz1);
+ insz2 = eval(insz2);
+ //nout = eval(nout);
+ no_of_st = int(inval);
+ no_of_in = insz2 - no_of_st;
+ no_of_op = insz1 - no_of_st;
+ if(nout == 1)
+ outsize(1) = string(no_of_st+no_of_op+2);
+ outsize(2) = string(no_of_st+no_of_in);
+ else
+ outsize(1) = string(no_of_st+no_of_in+no_of_op+2);
+ outsize(2) = string(no_of_st+no_of_in+no_of_op);
+ end
+endfunction