Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/chol.cc @ 10410:b3ec24dc305a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
chol.cc: Increase tolerance for single precision test.
author Ben Abbott <bpabbott@mac.com>
date Fri, 12 Mar 2010 19:15:39 -0500
parents d0ce5e973937
children 89f4d7e294cc
comparison
equal deleted inserted replaced
10409:a87afd063e7d 10410:b3ec24dc305a
983 %! 983 %!
984 %! j = 3; p = [1:j-1, j+1:5]; 984 %! j = 3; p = [1:j-1, j+1:5];
985 %! R1 = cholinsert(R,j,u2); A1 = R1'*R1; 985 %! R1 = cholinsert(R,j,u2); A1 = R1'*R1;
986 %! 986 %!
987 %! assert(norm(triu(R1)-R1,Inf) == 0) 987 %! assert(norm(triu(R1)-R1,Inf) == 0)
988 %! assert(norm(A1(p,p) - single(Ac),Inf) < 1e1*eps('single')) 988 %! assert(norm(A1(p,p) - single(Ac),Inf) < 2e1*eps('single'))
989 %! 989 %!
990 */ 990 */
991 991
992 DEFUN_DLD (choldelete, args, , 992 DEFUN_DLD (choldelete, args, ,
993 "-*- texinfo -*-\n\ 993 "-*- texinfo -*-\n\