Mercurial > hg > octave-nkf

annotate liboctave/numeric/base-min.h @ 18238:8f256148d82b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Periodic merge of gui-release to default.
author John W. Eaton <jwe@octave.org>
date Tue, 07 Jan 2014 16:07:54 -0500
parents 49a5a4be04a1
children 4197fc428c7d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
1 /*
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
2
17744
d63878346099 maint: Update copyright notices for release.
John W. Eaton <jwe@octave.org>
parents: 15271
diff changeset
3 Copyright (C) 1995-2013 John W. Eaton
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
4
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
6
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
10 option) any later version.
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
11
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
15 for more details.
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
16
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
18 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
19 <http://www.gnu.org/licenses/>.
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
20
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
21 */
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
22
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
23 #if !defined (octave_base_min_h)
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
24 #define octave_base_min_h 1
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
25
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
26 #include "dColVector.h"
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
27
1879
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
28 class
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
29 base_minimizer
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
30 {
1837
33dc934c0e38 [project @ 1996-02-03 07:51:07 by jwe]
jwe
parents: 1835
diff changeset
31 public:
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
32
1879
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
33 base_minimizer (void) : x () { }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
34
1879
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
35 base_minimizer (const ColumnVector& xx) : x (xx) { }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
36
1879
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
37 base_minimizer (const base_minimizer& a) : x (a.x) { }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
38
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
39 virtual ~base_minimizer (void) { }
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
40
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
41 base_minimizer& operator = (const base_minimizer& a)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
42 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
43 if (this != &a)
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
44 x = a.x;
1879
1b43d3c06c04 [project @ 1996-02-05 16:24:56 by jwe]
jwe
parents: 1840
diff changeset
45
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
46 return *this;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
47 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
48
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
49 // Derived classes must provide a function to actually do the
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
50 // minimization.
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
51
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 2847
diff changeset
52 virtual ColumnVector do_minimize (double& objf, octave_idx_type& inform,
10312
cbc402e64d83 untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents: 10158
diff changeset
53 ColumnVector& lambda) = 0;
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
54
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
55 // Lots of ways to call the single function and optionally set and
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
56 // get additional information.
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
57
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
58 virtual ColumnVector minimize (void)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
59 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
60 double objf;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
61 octave_idx_type inform;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
62 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
63 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
64 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
65
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
66 virtual ColumnVector minimize (double& objf)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
67 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
68 octave_idx_type inform;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
69 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
70 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
71 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
72
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 2847
diff changeset
73 virtual ColumnVector minimize (double& objf, octave_idx_type& inform)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
74 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
75 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
76 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
77 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
78
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 2847
diff changeset
79 virtual ColumnVector minimize (double& objf, octave_idx_type& inform,
10312
cbc402e64d83 untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents: 10158
diff changeset
80 ColumnVector& lambda)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
81 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
82 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
83 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
84
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
85 virtual ColumnVector minimize (const ColumnVector& x0)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
86 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
87 x = x0;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
88 double objf;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
89 octave_idx_type inform;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
90 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
91 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
92 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
93
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
94 virtual ColumnVector minimize (const ColumnVector& x0, double& objf)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
95 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
96 x = x0;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
97 octave_idx_type inform;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
98 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
99 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
100 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
101
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
102 virtual ColumnVector minimize (const ColumnVector& x0, double& objf,
10312
cbc402e64d83 untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents: 10158
diff changeset
103 octave_idx_type& inform)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
104 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
105 x = x0;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
106 ColumnVector lambda;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
107 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
108 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
109
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
110 virtual ColumnVector minimize (const ColumnVector& x0, double& objf,
10312
cbc402e64d83 untabify liboctave header files
John W. Eaton <jwe@octave.org>
parents: 10158
diff changeset
111 octave_idx_type& inform, ColumnVector& lambda)
17769
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
112 {
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
113 x = x0;
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
114 return do_minimize (objf, inform, lambda);
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/
Rik <rik@octave.org>
parents: 17744
diff changeset
115 }
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
116
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 2847
diff changeset
117 octave_idx_type size (void) const { return x.capacity (); }
1835
12a94a17509d [project @ 1996-02-03 07:16:15 by jwe]
jwe
parents: 1536
diff changeset
118
1527
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
119 protected:
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
120
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
121 ColumnVector x;
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
122 };
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
123
13d27938e778 [project @ 1995-10-05 01:44:18 by jwe]
jwe
parents:
diff changeset
124 #endif