changeset 19630:e68267373191

chop.m: Calculate deflate as 1./inflate (bug #43734). chop.m: Calculate deflate as 1./inflate (bug #43734).
author Rik <rik@octave.org>
date Sat, 24 Jan 2015 22:27:12 -0800
parents 6928682a90b2
children 884e0c55d92c
files scripts/general/chop.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/chop.m	Fri Jan 23 16:44:18 2015 -0500
+++ b/scripts/general/chop.m	Sat Jan 24 22:27:12 2015 -0800
@@ -55,7 +55,7 @@
     ## unless base was explicitly provided.
 
     inflate = 10 .^ (ndigits - tmp);
-    deflate = 10 .^ (tmp - ndigits);
+    deflate = 1 ./ inflate;
     if (nargin == 2)
       retval = deflate .* round (x .* inflate);
     else