diff scripts/linear-algebra/onenormest.m @ 8506:bc982528de11

comment style fixes
author John W. Eaton <jwe@octave.org>
date Tue, 13 Jan 2009 11:56:00 -0500
parents df9519e9990c
children cadc73247d65
line wrap: on
line diff
--- a/scripts/linear-algebra/onenormest.m
+++ b/scripts/linear-algebra/onenormest.m
@@ -131,9 +131,14 @@
   X = rand (n, t);
   X = X ./ (ones (n,1) * sum (abs (X), 1));
 
-  been_there = zeros (n, 1); # Track if a vertex has been visited.
-  est_old = 0; # To check if the estimate has increased.
-  S = zeros (n, t); # Normalized vector of signs.  The normalization is 
+  ## Track if a vertex has been visited.
+  been_there = zeros (n, 1);
+
+  ## To check if the estimate has increased.
+  est_old = 0;
+
+  ## Normalized vector of signs.
+  S = zeros (n, t);
 
   if (issing)
     myeps = eps ("single");