Mercurial > hg > octave-nkf
diff scripts/sparse/sprandsym.m @ 8506:bc982528de11
comment style fixes
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 13 Jan 2009 11:56:00 -0500 |
parents | f5005d9510f4 |
children | eb63fbe60fab |
line wrap: on
line diff
--- a/scripts/sparse/sprandsym.m +++ b/scripts/sparse/sprandsym.m @@ -49,7 +49,9 @@ ## random values than necessary in order to reduce the probability ## that there are less than k distinct values; maybe a better ## strategy could be used but I don't think it's worth the price. - k1 = min (length (idx1), k1); # actual number of entries in S + + ## Actual number of entries in S. + k1 = min (length (idx1), k1); j1 = floor ((idx1(1:k1)-1)/m1); i1 = idx1(1:k1) - j1*m1;