# HG changeset patch # User jwe # Date 942373807 0 # Node ID a007eb407ff54b4ab63a958e4801121a893e6a42 # Parent 315f89ff236762961849a148b6fd7e98cfb109d4 [project @ 1999-11-12 02:30:07 by jwe] diff -r 315f89ff2367 -r a007eb407ff5 test/octave.test/poly/residue-1.m --- a/test/octave.test/poly/residue-1.m Thu Nov 11 02:16:12 1999 +0000 +++ b/test/octave.test/poly/residue-1.m Fri Nov 12 02:30:07 1999 +0000 @@ -1,7 +1,7 @@ b = [1, 1, 1]; a = [1, -5, 8, -4]; [r, p, k, e] = residue (b, a); -(abs (r - [-2; 7; 3]) < sqrt (eps) +(abs (r - [-2; 7; 3]) < 1e-6 && abs (p - [2; 2; 1]) < sqrt (eps) && isempty (k) && e == [1; 2; 1])