Mercurial > octave

diff libinterp/corefcn/qz.cc @ 30390:a61e1a0f6024 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 7d6709900da7
children 796f54d4ddbf
line wrap: on
line diff
--- a/libinterp/corefcn/qz.cc	Mon Nov 29 11:15:15 2021 +0900
+++ b/libinterp/corefcn/qz.cc	Sun Nov 28 21:52:08 2021 -0800
@@ -297,10 +297,10 @@
   // First, declare variables used in both the real and complex cases.
   // FIXME: There are a lot of excess variables declared.
   //        Probably a better way to handle this.
-  Matrix QQ (nn,nn), ZZ (nn,nn), VR (nn,nn), VL (nn,nn);
+  Matrix QQ (nn, nn), ZZ (nn, nn), VR (nn, nn), VL (nn, nn);
   RowVector alphar (nn), alphai (nn), betar (nn);
   ComplexRowVector xalpha (nn), xbeta (nn);
-  ComplexMatrix CQ (nn,nn), CZ (nn,nn), CVR (nn,nn), CVL (nn,nn);
+  ComplexMatrix CQ (nn, nn), CZ (nn, nn), CVR (nn, nn), CVL (nn, nn);
   F77_INT ilo, ihi, info;
   char comp_q = (nargout >= 3 ? 'V' : 'N');
   char comp_z = ((nargout >= 4 || nargin == 3)? 'V' : 'N');
@@ -314,8 +314,8 @@
       std::fill_n (ZZptr, ZZ.numel (), 0.0);
       for (F77_INT i = 0; i < nn; i++)
         {
-          QQ(i,i) = 1.0;
-          ZZ(i,i) = 1.0;
+          QQ(i, i) = 1.0;
+          ZZ(i, i) = 1.0;
         }
     }
 
@@ -760,18 +760,18 @@
               if (j == (nn-1))
                 // Single column.
                 cinc = 1;
-              else if (aa(j+1,j) == 0)
+              else if (aa(j+1, j) == 0)
                 cinc = 1;
 
               // Now copy the eigenvector (s) to CVR, CVL.
               if (cinc == 1)
                 {
                   for (F77_INT i = 0; i < nn; i++)
-                    CVR(i,j) = VR(i,j);
+                    CVR(i, j) = VR(i, j);
 
                   if (side == 'B')
                     for (F77_INT i = 0; i < nn; i++)
-                      CVL(i,j) = VL(i,j);
+                      CVL(i, j) = VL(i, j);
                 }
               else
                 {
@@ -779,15 +779,15 @@
 
                   for (F77_INT i = 0; i < nn; i++)
                     {
-                      CVR(i,j) = Complex (VR(i,j), VR(i,j+1));
-                      CVR(i,j+1) = Complex (VR(i,j), -VR(i,j+1));
+                      CVR(i, j) = Complex (VR(i, j), VR(i, j+1));
+                      CVR(i, j+1) = Complex (VR(i, j), -VR(i, j+1));
                     }
 
                   if (side == 'B')
                     for (F77_INT i = 0; i < nn; i++)
                       {
-                        CVL(i,j) = Complex (VL(i,j), VL(i,j+1));
-                        CVL(i,j+1) = Complex (VL(i,j), -VL(i,j+1));
+                        CVL(i, j) = Complex (VL(i, j), VL(i, j+1));
+                        CVL(i, j+1) = Complex (VL(i, j), -VL(i, j+1));
                       }
                 }