diff options
author | pmarecha | 2008-06-05 08:49:05 +0000 |
---|---|---|
committer | pmarecha | 2008-06-05 08:49:05 +0000 |
commit | 42659d6cdbe63972aea27baf0289db8fcc1310fa (patch) | |
tree | 05cc1eb42b985cf657be112ae5a2e842a13c2126 /src/Scilab2C/SCI2CGeneral/Array2String.sci | |
parent | c4ca26eb9d2bbe224e41fc40658279cb865c48fc (diff) | |
download | scilab2c-42659d6cdbe63972aea27baf0289db8fcc1310fa.tar.gz scilab2c-42659d6cdbe63972aea27baf0289db8fcc1310fa.tar.bz2 scilab2c-42659d6cdbe63972aea27baf0289db8fcc1310fa.zip |
SVN is not FTP !
Diffstat (limited to 'src/Scilab2C/SCI2CGeneral/Array2String.sci')
-rw-r--r-- | src/Scilab2C/SCI2CGeneral/Array2String.sci | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/src/Scilab2C/SCI2CGeneral/Array2String.sci b/src/Scilab2C/SCI2CGeneral/Array2String.sci new file mode 100644 index 00000000..1fd15f66 --- /dev/null +++ b/src/Scilab2C/SCI2CGeneral/Array2String.sci @@ -0,0 +1,30 @@ +function [StringArray] = Array2String(InArray);
+// function [StringArray] = Array2String(InArray);
+// -----------------------------------------------------------------
+// Converts an input array into a string. Maximum 2D array are allowed.
+// Ex.: InArray = [10, 4];
+// StringArray = "[10, 4]";
+//
+// Input data:
+// InArray: Input array.
+//
+// Output data:
+// StringArray: array converted into a string.
+//
+// Status:
+// 13-May-2007 -- Nutricato Raffaele: Author.
+// -----------------------------------------------------------------
+
+[Nrows,Ncols] = size(InArray);
+
+StringArray = '[';
+for counterrows = 1:Nrows
+ for countercols = 1:Ncols
+ StringArray = StringArray + string(InArray(counterrows,countercols)) + ',';
+ end
+ StringArray = part(StringArray,1:(length(StringArray)-1)); // Remove the last ','
+ StringArray = StringArray+';';
+end
+StringArray = part(StringArray,1:(length(StringArray)-1)); // Remove the last ';'
+StringArray = StringArray+']';
+endfunction
|