From b351d686f57f85cbe923132164ce718704bcdfa2 Mon Sep 17 00:00:00 2001 From: jofret Date: Thu, 17 Jun 2010 10:10:04 +0000 Subject: Remove SCI2Cisnum wrapping around isnum function --- macros/FunctionAnnotation/FA_SZ_OPCC.sci | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'macros/FunctionAnnotation/FA_SZ_OPCC.sci') diff --git a/macros/FunctionAnnotation/FA_SZ_OPCC.sci b/macros/FunctionAnnotation/FA_SZ_OPCC.sci index cc532e24..50527771 100644 --- a/macros/FunctionAnnotation/FA_SZ_OPCC.sci +++ b/macros/FunctionAnnotation/FA_SZ_OPCC.sci @@ -2,7 +2,7 @@ function opoutsize = FA_SZ_OPCC(in1size,in2size) // function opoutsize = FA_SZ_OPCC(in1size,in2size) // ----------------------------------------------------------------- // Returns the size of the output computed by OPCC operator. -// +// // // Status: // 08-Mar-2008 -- Raffaele Nutricato: Author. @@ -27,11 +27,11 @@ in2size = string(in2size); in1dim = GetSymbolDimension(in1size); in2dim = GetSymbolDimension(in2size); -if (SCI2Cisnum(in1size(1)) & SCI2Cisnum(in2size(1))) +if (isnum(in1size(1)) & isnum(in2size(1))) in1num = eval(in1size(1)); in2num = eval(in2size(1)); opoutsize(1) = string(in1num+in2num); -else +else opoutsize(1) = '('+string(in1size(1))+'+'+string(in2size(1))+')'; end -- cgit