Deleted vectorized computation feature. Deleted neldermead_contour. Fixed the demos.
[scilab.git] / scilab / modules / optimization / macros / neldermead / neldermead_configure.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2008-2009 - INRIA - Michael Baudin
3 //
4 // This file must be used under the terms of the CeCILL.
5 // This source file is licensed as described in the file COPYING, which
6 // you should have received as part of this distribution.  The terms
7 // are also available at
8 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
9
10 //
11 // neldermead_configure --
12 //   Configure neldermead and returns the modified object.
13 //
14 function this = neldermead_configure (this,key,value)
15   select key
16   case "-method" then
17     select value
18     case "fixed" then
19       this.method = "fixed";
20     case "variable" then
21       this.method = "variable";
22     case "box" then
23       this.method = "box";
24     else
25       errmsg = msprintf(gettext("%s: Unknown value %s for -method option"),"neldermead_configure",value);
26       error(errmsg);
27     end
28   case "-coords0" then
29     this.coords0 = value;
30   case "-simplex0method" then
31     select value
32     case "given" then
33       this.simplex0method = "given";
34     case "axes" then
35       this.simplex0method = "axes";
36     case "spendley" then
37       this.simplex0method = "spendley";
38     case "pfeffer" then
39       this.simplex0method = "pfeffer";
40     case "randbounds" then
41       this.simplex0method = "randbounds";
42     else
43       errmsg = msprintf(gettext("%s: Unknown value %s for -simplex0method option"),"neldermead_configure", value);
44       error(errmsg);
45     end
46   case "-simplex0length" then
47     this.simplex0length = value;
48   case "-simplex0deltausual" then
49     this.simplex0deltausual = value;
50   case "-simplex0deltazero" then
51     this.simplex0deltazero = value;
52   case "-rho" then
53     this.rho = value;
54   case "-chi" then
55     this.chi = value;
56   case "-gamma" then
57     this.gamma = value;
58   case "-sigma" then
59     this.sigma = value;
60   case "-tolfstdeviation" then
61     this.tolfstdeviation = value;
62   case "-tolfstdeviationmethod" then
63     select value
64     case "enabled" then
65       this.tolfstdeviationmethod = value;
66     case "disabled" then
67       this.tolfstdeviationmethod = value;
68     else
69       errmsg = msprintf(gettext("%s: Unknown value %s for -tolfstdeviationmethod option"),"neldermead_configure", value);
70       error(errmsg);
71     end
72   case "-tolsimplexizeabsolute" then
73     this.tolsimplexizeabsolute = value;
74   case "-tolsimplexizerelative" then
75     this.tolsimplexizerelative = value;
76   case "-tolsimplexizemethod" then
77     select value
78     case "enabled" then
79       this.tolsimplexizemethod = value;
80     case "disabled" then
81       this.tolsimplexizemethod = value;
82     else
83       errmsg = msprintf(gettext("%s: Unknown value %s for -tolsimplexizemethod option"),"neldermead_configure", value);
84       error(errmsg);
85     end
86   case "-toldeltafv" then
87     this.toldeltafv = value;
88   case "-tolssizedeltafvmethod" then
89     select value
90     case "enabled" then
91       this.tolssizedeltafvmethod = value;
92     case "disabled" then
93       this.tolssizedeltafvmethod = value;
94     else
95       errmsg = msprintf(gettext("%s: Unknown value %s for -tolssizedeltafvmethod option"),"neldermead_configure", value);
96       error(errmsg);
97     end
98   case "-restartmax" then
99     this.restartmax = value;
100   case "-restarteps" then
101     this.restarteps = value;
102   case "-restartstep" then
103     this.restartstep = value;
104   case "-kelleystagnationflag" then
105     this.kelleystagnationflag = value;
106   case "-kelleynormalizationflag" then
107     this.kelleynormalizationflag = value;
108   case "-kelleystagnationalpha0" then
109     this.kelleystagnationalpha0 = value;
110   case "-restartflag" then
111     this.restartflag = value;
112   case "-restartdetection" then
113     this.restartdetection = value;
114   case "-restartsimplexmethod" then
115     this.restartsimplexmethod = value;
116   case "-boxnbpoints" then
117     this.boxnbpoints = value;
118   case "-nbineqloops" then
119     this.nbineqloops = value;
120   case "-ineqscaling" then
121     this.ineqscaling = value;
122   else
123     // Delegate to the optimization object
124     this.optbase = optimbase_configure ( this.optbase , key , value );
125   end
126 endfunction
127