Mercurial > octave-libgccjit

comparison test/test_diag_perm.m @ 8952:43aec7c168eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
test_diag_per.m: additional assert for sparse conversion test
author Jason Riedy <jason@acm.org>
date Tue, 10 Mar 2009 16:14:35 -0400
parents 5bce1357edd6
children f4f4d65faaa0
comparison
equal deleted inserted replaced
8951:5bce1357edd6 8952:43aec7c168eb
74 %! n = 7; 74 %! n = 7;
75 %! P = eye (n) (:, randperm (n)); 75 %! P = eye (n) (:, randperm (n));
76 %! sP = sparse (P); 76 %! sP = sparse (P);
77 %! assert (full (sP), full (P)); 77 %! assert (full (sP), full (P));
78 %! assert (size (find (sP), 1), n); 78 %! assert (size (find (sP), 1), n);
79 %! [I, J, V] = find (sP);
80 %! assert (all (V == 1));
79 81
80 ######################################## 82 ########################################
81 ## Diagonal matrices 83 ## Diagonal matrices
82 84
83 ## square row scaling 85 ## square row scaling