Mercurial > hg > octave-lyh

comparison scripts/linear-algebra/null.m @ 12890:278faf7e7bd1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
null.m: test correction
author Tatsuro Matsuoka <tmacchant@yahoo.co.jp>
date Tue, 26 Jul 2011 21:48:27 -0500
parents a85ddaf8f402
children 72c96de7a403
comparison
equal deleted inserted replaced
12889:dae596be0571 12890:278faf7e7bd1
94 %! A = [1 0; 1 0]; 94 %! A = [1 0; 1 0];
95 %! assert(null(A), [0 1]') 95 %! assert(null(A), [0 1]')
96 96
97 %!test 97 %!test
98 %! A = [1 1; 0 0]; 98 %! A = [1 1; 0 0];
99 %! assert(null(A), [-1/sqrt(2) 1/sqrt(2)]') 99 %! assert(null(A), [-1/sqrt(2) 1/sqrt(2)]', eps)
100 100
101 %!test 101 %!test
102 %! tol = 1e-4; 102 %! tol = 1e-4;
103 %! A = [1 0; 0 tol-eps]; 103 %! A = [1 0; 0 tol-eps];
104 %! assert(null(A,tol), [0 1]') 104 %! assert(null(A,tol), [0 1]')