diff options
author | Sunil Shetye | 2019-05-16 12:18:48 +0530 |
---|---|---|
committer | Sunil Shetye | 2019-05-29 11:08:01 +0530 |
commit | 26b77d7593b5ee0792b6b556f5569ea4227c2b02 (patch) | |
tree | 8f92052234b01bf39b9c3a6e3cb12b3962d96b1b /macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci | |
parent | 5a73e6bec4a12db7afae9de300e39256f754d8d3 (diff) | |
download | scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.gz scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.bz2 scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.zip |
convert to unix format
Diffstat (limited to 'macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci')
-rw-r--r-- | macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci | 100 |
1 files changed, 50 insertions, 50 deletions
diff --git a/macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci b/macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci index 527217a5..7883de6d 100644 --- a/macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci +++ b/macros/FunctionAnnotation/FA_SZ_ROW_COLUMN_CAT.sci @@ -1,50 +1,50 @@ -function outsize = FA_SZ_ROW_COLUMN_CAT(inval,in1size,in2size)
-//function outsize = FA_SZ_ROW_COLUMN_CAT(inval,in1size,in2size)
-// -----------------------------------------------------------------
-// Get size of row (col) of the output for cat function
-//
-// Input data:
-// inval: string specifying the value of input argument.
-// in1size: string specifying the row (col) of second input
-// in3size: string specifying the row (col) of third input
-// Output data:
-// outsize: string containing the column size for output argument.
-//
-// Copyright (C) 2017 - IIT Bombay - FOSSEE
-//
-// This file must be used under the terms of the CeCILL.
-// This source file is licensed as described in the file COPYING, which
-// you should have received as part of this distribution. The terms
-// are also available at
-// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
-// Author: Mushir
-// Organization: FOSSEE, IIT Bombay
-// Email: toolbox@scilab.in
-//
-
-// -----------------------------------------------------------------
-
-// ------------------------------
-// --- Check input arguments. ---
-// ------------------------------
-SCI2CNInArgCheck(argn(2),3,3);
-
-
-in1size = string(in1size);
-in2size = string(in2size);
-inval = string(inval);
-if(inval == '1') then
- in1num_r = eval(in1size);
- in2num_r = eval(in2size);
- outsize(1) = string(in1num_r + in2num_r);
- outsize(2) = string(in2num_r);
-elseif(inval == '2') then
- in1num_c = eval(in1size);
- in2num_c = eval(in2size);
- outsize(1) = string(in1num_c);
- outsize(2) = string(in1num_c + in2num_c);
-else
- error(36, "Wrong input argument "+inval+". Use 1 or 2 as first argument in cat command.");
-end
-
-endfunction
+function outsize = FA_SZ_ROW_COLUMN_CAT(inval,in1size,in2size) +//function outsize = FA_SZ_ROW_COLUMN_CAT(inval,in1size,in2size) +// ----------------------------------------------------------------- +// Get size of row (col) of the output for cat function +// +// Input data: +// inval: string specifying the value of input argument. +// in1size: string specifying the row (col) of second input +// in3size: string specifying the row (col) of third input +// Output data: +// outsize: string containing the column size for output argument. +// +// Copyright (C) 2017 - IIT Bombay - FOSSEE +// +// This file must be used under the terms of the CeCILL. +// This source file is licensed as described in the file COPYING, which +// you should have received as part of this distribution. The terms +// are also available at +// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt +// Author: Mushir +// Organization: FOSSEE, IIT Bombay +// Email: toolbox@scilab.in +// + +// ----------------------------------------------------------------- + +// ------------------------------ +// --- Check input arguments. --- +// ------------------------------ +SCI2CNInArgCheck(argn(2),3,3); + + +in1size = string(in1size); +in2size = string(in2size); +inval = string(inval); +if(inval == '1') then + in1num_r = eval(in1size); + in2num_r = eval(in2size); + outsize(1) = string(in1num_r + in2num_r); + outsize(2) = string(in2num_r); +elseif(inval == '2') then + in1num_c = eval(in1size); + in2num_c = eval(in2size); + outsize(1) = string(in1num_c); + outsize(2) = string(in1num_c + in2num_c); +else + error(36, "Wrong input argument "+inval+". Use 1 or 2 as first argument in cat command."); +end + +endfunction |