Mercurial > hg > octave-nkf

diff scripts/general/num2str.m @ 4919:a1073eef650c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-07-27 15:22:50 by jwe]
author jwe
date Tue, 27 Jul 2004 15:22:51 +0000
parents d2a7208f35d4
children c08cb1098afc
line wrap: on
line diff
--- a/scripts/general/num2str.m
+++ b/scripts/general/num2str.m
@@ -44,7 +44,7 @@
       if (isstr (arg))
 	fmt = strcat (arg, "%-+", arg(2:end), "i");
       else
-	if (isnumeric (x) && round (x) == x && abs (x) < (10.^arg))
+	if (isnumeric (x) && round (x) == x && abs (x) < (10 .^ arg))
 	  fmt = sprintf ("%%%dd%%-+%ddi  ", arg, arg);
 	else
 	  fmt = sprintf ("%%%d.%dg%%-+%d.%dgi", arg+7, arg, arg+7, arg);
@@ -107,7 +107,7 @@
       if (isstr (arg))
 	fmt = arg;
       else
-	if (isnumeric (x) && round (x) == x && abs (x) < (10.^ arg))
+	if (isnumeric (x) && round (x) == x && abs (x) < (10 .^ arg))
 	  fmt = sprintf ("%%%dd  ", arg);
 	else
 	  fmt = sprintf ("%%%d.%dg", arg+7, arg);