diff options
Diffstat (limited to 'macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci')
-rw-r--r-- | macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci | 64 |
1 files changed, 32 insertions, 32 deletions
diff --git a/macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci b/macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci index 3fbae19a..1263f127 100644 --- a/macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci +++ b/macros/FunctionAnnotation/FA_SZ_OPDOTSTAR.sci @@ -1,32 +1,32 @@ -function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size)
-// function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size)
-// -----------------------------------------------------------------
-// Returns the size of the output computed by OPDOTSTAR operator.
-//
-//
-// Status:
-// 08-Jan-2008 -- Raffaele Nutricato: Author.
-// 08-Jan-2008 -- Alberto Morea: Test Ok.
-//
-// Copyright 2008 Raffaele Nutricato & Alberto Morea.
-// Contact: raffaele.nutricato@tiscali.it
-// -----------------------------------------------------------------
-
-// ------------------------------
-// --- Check input arguments. ---
-// ------------------------------
-SCI2CNInArgCheck(argn(2),2,2);
-
-// ------------------------
-// --- Generate Output. ---
-// ------------------------
-// --- Get dimensions of input arguments. ---
-in1dim = GetSymbolDimension(in1size);
-
-if (in1dim == 0)
- opoutsize = string(in2size);
-else
- opoutsize = string(in1size);
-end
-
-endfunction
+function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size) +// function opoutsize = FA_SZ_OPDOTSTAR(in1size,in2size) +// ----------------------------------------------------------------- +// Returns the size of the output computed by OPDOTSTAR operator. +// +// +// Status: +// 08-Jan-2008 -- Raffaele Nutricato: Author. +// 08-Jan-2008 -- Alberto Morea: Test Ok. +// +// Copyright 2008 Raffaele Nutricato & Alberto Morea. +// Contact: raffaele.nutricato@tiscali.it +// ----------------------------------------------------------------- + +// ------------------------------ +// --- Check input arguments. --- +// ------------------------------ +SCI2CNInArgCheck(argn(2),2,2); + +// ------------------------ +// --- Generate Output. --- +// ------------------------ +// --- Get dimensions of input arguments. --- +in1dim = GetSymbolDimension(in1size); + +if (in1dim == 0) + opoutsize = string(in2size); +else + opoutsize = string(in1size); +end + +endfunction |