diff options
Diffstat (limited to '2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci')
-rw-r--r-- | 2.3-1/macros/FunctionAnnotation/FA_SZ_OBSCNT.sci | 17 |
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 |