Mercurial > octave

diff liboctave/CmplxAEPBAL.cc @ 1360:7eb93d12654c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-09-05 21:51:54 by jwe]
author jwe
date Tue, 05 Sep 1995 21:51:54 +0000
parents 611d403c7f3d
children a744f4d0ba59
line wrap: on
line diff
--- a/liboctave/CmplxAEPBAL.cc	Tue Sep 05 21:30:26 1995 +0000
+++ b/liboctave/CmplxAEPBAL.cc	Tue Sep 05 21:51:54 1995 +0000
@@ -51,14 +51,14 @@
 
   int n = a.cols ();
 
-// Parameters for balance call.
+  // Parameters for balance call.
 
   int info;
   int ilo;
   int ihi;
   double *scale = new double [n];
 
-// Copy matrix into local structure.
+  // Copy matrix into local structure.
 
   balanced_mat = a;
 
@@ -66,7 +66,7 @@
 			    balanced_mat.fortran_vec (), n, ilo, ihi,
 			    scale, info, 1L, 1L);
 
-// Initialize balancing matrix to identity.
+  // Initialize balancing matrix to identity.
 
   balancing_mat = Matrix (n, n, 0.0);
   for (int i = 0; i < n; i++)