Mercurial > hg > octave-lyh
diff src/DLD-FUNCTIONS/luinc.cc @ 7243:e8d7eed42935
[project @ 2007-12-04 02:10:17 by jwe]
author | jwe |
---|---|
date | Tue, 04 Dec 2007 02:10:18 +0000 |
parents | a1dbe9d80eee |
children | f3c00dc0912b |
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/luinc.cc +++ b/src/DLD-FUNCTIONS/luinc.cc @@ -300,7 +300,7 @@ /* -%!test +%!testif HAVE_UMFPACK %! a=sparse([1,2,0,0;0,1,2,0;1e-14,0,3,0;0,0,0,1]); %! [l,u]=luinc(a,1e-10); %! assert(l*u, sparse([1,2,0,0;0,1,2,0;0,0,3,0;0,0,0,1]),1e-10); @@ -308,7 +308,7 @@ %! [l,u]=luinc(a,opts); %! assert(l*u, sparse([1,2,0,0;0,1,2,0;0,0,3,0;0,0,0,1]),1e-10); -%!test +%!testif HAVE_UMFPACK %! a=sparse([1i,2,0,0;0,1,2,0;1e-14,0,3,0;0,0,0,1]); %! [l,u]=luinc(a,1e-10); %! assert(l*u, sparse([1i,2,0,0;0,1,2,0;0,0,3,0;0,0,0,1]),1e-10);