Mercurial > hg > octave-nkf

diff scripts/polynomial/polyreduce.m @ 3426:f8dde1807dee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-13 08:40:00 by jwe]
author jwe
date Thu, 13 Jan 2000 08:40:53 +0000
parents a4cd1e9d9962
children e031284eea27
line wrap: on
line diff
--- a/scripts/polynomial/polyreduce.m
+++ b/scripts/polynomial/polyreduce.m
@@ -50,13 +50,13 @@
 
       if (length (index) != 0)
 
-      	if (length (p) > 1)
-	  p = p (index (length (index))+1:length (p));
-      	endif
+        if (length (p) > 1)
+          p = p (index (length (index))+1:length (p));
+        endif
 
-      	if (length (p) == 0)
-	  p = 0;
-      	endif
+        if (length (p) == 0)
+          p = 0;
+        endif
 
       endif