Mercurial > octave-nkf

diff scripts/linear-algebra/orth.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents eb63fbe60fab
children a8ce6bdecce5
line wrap: on
line diff
--- a/scripts/linear-algebra/orth.m	Fri Apr 23 11:13:48 2010 -0700
+++ b/scripts/linear-algebra/orth.m	Fri Apr 23 11:28:50 2010 -0700
@@ -52,9 +52,9 @@
 
     if (nargin == 1)
       if (isa (A, "single"))
-	tol = max (size (A)) * s (1) * eps ("single");
+        tol = max (size (A)) * s (1) * eps ("single");
       else
-	tol = max (size (A)) * s (1) * eps;
+        tol = max (size (A)) * s (1) * eps;
       endif
     endif