Mercurial > octave-nkf

comparison scripts/special-matrix/gallery.m @ 17312:088d014a7fe2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use semicolon after "return" statement in core m-files. * scripts/general/accumdim.m, scripts/image/imformats.m, scripts/io/textread.m, scripts/io/textscan.m, scripts/linear-algebra/expm.m, scripts/miscellaneous/edit.m, scripts/optimization/lsqnonneg.m, scripts/optimization/pqpnonneg.m, scripts/pkg/private/dirempty.m, scripts/plot/findobj.m, scripts/plot/graphics_toolkit.m, scripts/plot/private/__errplot__.m, scripts/plot/private/__interp_cube__.m, scripts/plot/private/__marching_cube__.m, scripts/plot/subplot.m, scripts/polynomial/residue.m, scripts/sparse/sprandsym.m, scripts/special-matrix/gallery.m, scripts/strings/strjoin.m: Use semicolon after "return" statement in core m-files.
author Rik <rik@octave.org>
date Wed, 21 Aug 2013 19:53:42 -0700
parents 09543e9c8f40
children 1c89599167a6
comparison
equal deleted inserted replaced
17311:56404cdcb723 17312:088d014a7fe2
2250 if (posdef) 2250 if (posdef)
2251 ## handle case where KAPPA was negative 2251 ## handle case where KAPPA was negative
2252 Q = qmult (p); 2252 Q = qmult (p);
2253 A = Q' * sigma * Q; 2253 A = Q' * sigma * Q;
2254 A = (A + A') / 2; # Ensure matrix is symmetric. 2254 A = (A + A') / 2; # Ensure matrix is symmetric.
2255 return 2255 return;
2256 endif 2256 endif
2257 2257
2258 if (m != n) 2258 if (m != n)
2259 ## Expand to m-by-n diagonal matrix 2259 ## Expand to m-by-n diagonal matrix
2260 sigma(m, n) = 0; 2260 sigma(m, n) = 0;