Mercurial > hg > octave-nkf
diff scripts/strings/dec2base.m @ 11587:c792872f8942
all script files: untabify and strip trailing whitespace
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 17:35:29 -0500 |
parents | fd0a3ac60b0e |
children | f7cb824dc8c0 |
line wrap: on
line diff
--- a/scripts/strings/dec2base.m +++ b/scripts/strings/dec2base.m @@ -81,7 +81,7 @@ elseif (base < 2 || base > length (symbols)) error ("dec2base: BASE must be between 2 and 36, or a string of symbols"); endif - + ## determine number of digits required to handle all numbers, can overflow ## by 1 digit max_len = round (log (max (max (d), 1)) ./ log (base)) + 1; @@ -89,7 +89,7 @@ if (nargin == 3) max_len = max (max_len, len); endif - + ## determine digits for each number digits = zeros (length (d), max_len); for k = max_len:-1:1