Mercurial > octave-nkf

comparison libinterp/dldfcn/chol.cc @ 18945:d1c649bd90e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Periodic merge of gui-release to default.
author Rik <rik@octave.org>
date Sun, 13 Jul 2014 18:36:25 -0700
parents 479d1d3cb5c3 534511deb10e
children 38937efbee21
comparison
equal deleted inserted replaced
18940:c0fb31c46e87 18945:d1c649bd90e9
373 } 373 }
374 374
375 /* 375 /*
376 %!assert (chol ([2, 1; 1, 1]), [sqrt(2), 1/sqrt(2); 0, 1/sqrt(2)], sqrt (eps)) 376 %!assert (chol ([2, 1; 1, 1]), [sqrt(2), 1/sqrt(2); 0, 1/sqrt(2)], sqrt (eps))
377 %!assert (chol (single ([2, 1; 1, 1])), single ([sqrt(2), 1/sqrt(2); 0, 1/sqrt(2)]), sqrt (eps ("single"))) 377 %!assert (chol (single ([2, 1; 1, 1])), single ([sqrt(2), 1/sqrt(2); 0, 1/sqrt(2)]), sqrt (eps ("single")))
378 %!test 378 %!testif HAVE_CHOLMOD
379 %! ## Bug #42587 379 %! ## Bug #42587
380 %! A = sparse ([1 0 8;0 1 8;8 8 1]); 380 %! A = sparse ([1 0 8;0 1 8;8 8 1]);
381 %! [Q, p] = chol (A); 381 %! [Q, p] = chol (A);
382 %! assert (p != 0); 382 %! assert (p != 0);
383 383