[Octave-cvsupdate] octave-forge/main/optim minimize.m,1.15,1.16

[Paul K. <pki...@us...>]

Update of /cvsroot/octave/octave-forge/main/optim
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20817

Modified Files:
	minimize.m 
Log Message:
Don't use getfields.


Index: minimize.m
===================================================================
RCS file: /cvsroot/octave/octave-forge/main/optim/minimize.m,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- minimize.m	30 Sep 2004 19:17:05 -0000	1.15
+++ minimize.m	23 Mar 2005 04:51:05 -0000	1.16
@@ -157,17 +157,12 @@
 ops = read_options (opls,\
 		    "op0",op0, "op1",op1, "default",default);
 
-[backend,verbose,   \
- df, df, d2f, d2i,  \
- hess, ihess, jac,  \
- ftol, utol, dtol,  \
- order, narg, maxev,\
- isz, ndiff] = getfields (ops, "backend","verbose",\
-			 "df", "df","d2f", "d2i", \
-			 "hess", "ihess", "jac",  \
-			 "ftol" , "utol", "dtol", \
-			 "order", "narg", "maxev",\
-			 "isz", "ndiff");
+backend=ops.backend; verbose=ops.verbose; 
+df=ops.df; d2f=ops.d2f; d2i=ops.d2i; 
+hess=ops.hess; ihess=ops.ihess; jac=ops.jac; 
+ftol=ops.ftol; utol=ops.utol; dtol=ops.dtol;
+order=ops.order; narg=ops.narg; maxev=ops.maxev; 
+isz=ops.isz; ndiff=ops.ndiff;
 
 if length (df), error ("Option 'df' doesn't exist any more. Sorry.\n");end
 if jac, error ("Option 'jac' doesn't exist any more. Sorry.\n");end