Mercurial > octave
diff libinterp/corefcn/ordqz.cc @ 30390:a61e1a0f6024 stable
maint: style check C++ files in libinterp/ ahead of 7.1 release.
* Cell.cc, __eigs__.cc, __ichol__.cc, __ilu__.cc, __magick_read__.cc,
__qp__.cc, bitfcns.cc, bsxfun.cc, c-file-ptr-stream.h, ccolamd.cc, cellfun.cc,
data.cc, debug.cc, defun-int.h, dlmread.cc, event-manager.cc, fftn.cc,
file-io.cc, ft-text-renderer.cc, gl2ps-print.cc, graphics.cc, graphics.in.h,
gzfstream.cc, gzfstream.h, jsondecode.cc, jsonencode.cc,
latex-text-renderer.cc, ls-mat5.cc, lu.cc, mex.cc, oct-stream.cc,
oct-strstrm.cc, ordqz.cc, pager.h, pr-output.cc, qz.cc, schur.cc,
sparse-xdiv.cc, sparse-xpow.cc, sparse.cc, stack-frame.h, strfns.cc, svd.cc,
symrcm.cc, symscope.h, sysdep.cc, text-engine.h, text-renderer.h, tril.cc,
variables.h, xdiv.h, __glpk__.cc, __init_fltk__.cc, __init_gnuplot__.cc,
__voronoi__.cc, audiodevinfo.cc, cdef-class.cc, cdef-class.h, cdef-manager.cc,
cdef-manager.h, cdef-method.cc, cdef-object.cc, ov-base-diag.cc,
ov-base-diag.h, ov-base-int.cc, ov-base-int.h, ov-base-mat.cc, ov-base-mat.h,
ov-base-scalar.h, ov-base-sparse.cc, ov-base-sparse.h, ov-base.h,
ov-bool-mat.cc, ov-cell.cc, ov-cell.h, ov-class.cc, ov-class.h, ov-dld-fcn.cc,
ov-intx.h, ov-lazy-idx.cc, ov-lazy-idx.h, ov-mex-fcn.h, ov-perm.cc, ov-perm.h,
ov-range.cc, ov-re-mat.cc, ov-re-mat.h, ov-str-mat.h, ov-struct.cc,
ov-typeinfo.h, ov-usr-fcn.cc, ov.h, parse.h, pt-cell.cc, pt-stmt.cc,
pt-tm-const.cc, pt-walk.cc:
Style check C++ files in libinterp/ ahead of 7.1 release.
author | Rik <rik@octave.org> |
---|---|
date | Sun, 28 Nov 2021 21:52:08 -0800 |
parents | 1c114a55f4fb |
children | 796f54d4ddbf |
line wrap: on
line diff
--- a/libinterp/corefcn/ordqz.cc Mon Nov 29 11:15:15 2021 +0900 +++ b/libinterp/corefcn/ordqz.cc Sun Nov 28 21:52:08 2021 -0800 @@ -289,7 +289,7 @@ for (k = 0; k < nn-1; k++) { - if (caa(k+1,k) != 0.0) + if (caa(k+1, k) != 0.0) error_with_id ("Octave:ordqz:unsupported_AA", "ordqz: quasi upper triangular matrices are not " "allowed with complex data"); @@ -297,8 +297,8 @@ for (k = 0; k < nn; k++) { - alpha(k) = caa(k,k); - beta(k) = cbb(k,k); + alpha(k) = caa(k, k); + beta(k) = cbb(k, k); } for (k = 0; k < nn; k++) @@ -377,11 +377,11 @@ #ifdef DEBUG octave_stdout << "ordqz: k = " << k << " nn = " << nn << " \n"; #endif - if ((k < nn-1 && aa(k+1,k) == 0.0) || k == nn-1) + if ((k < nn-1 && aa(k+1, k) == 0.0) || k == nn-1) { - alphar(k) = aa(k,k); + alphar(k) = aa(k, k); alphai(k) = 0.0; - beta(k) = bb(k,k); + beta(k) = bb(k, k); k++; } else @@ -403,7 +403,7 @@ F77_CONST_CHAR_ARG2 (&comp_q, 1), F77_CONST_CHAR_ARG2 (&comp_z, 1), nl, ilo, ihi, - &aa_vec[k+k*nn] , nn, + &aa_vec[k+k*nn], nn, &bb_vec[k+k*nn], nn, ar, ai, b, nullptr, nn,