[Octave-cvsupdate] octave-forge/extra/tsa arfit2.m,1.10,1.11

[Alois S. <sch...@us...>]

Update of /cvsroot/octave/octave-forge/extra/tsa
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27529

Modified Files:
	arfit2.m 
Log Message:
style 

Index: arfit2.m
===================================================================
RCS file: /cvsroot/octave/octave-forge/extra/tsa/arfit2.m,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -d -r1.10 -r1.11
--- arfit2.m	25 May 2005 02:52:48 -0000	1.10
+++ arfit2.m	7 Nov 2005 14:40:43 -0000	1.11
@@ -82,8 +82,7 @@
 popt = pmin + iopt-1; % estimated optimum order 
 
 if popt<pmax, 
-        pmax=popt; 
-        [MAR, RCF, PE] = mvar(Y, pmax, 2);
+        [MAR, RCF, PE] = mvar(Y, popt, 2);
 end;
 %end