annotate liboctave/QPSOL.h @ 449:3cef0ce5dd7d

[project @ 1994-06-05 21:58:52 by jwe]
author jwe
date Sun, 05 Jun 1994 21:58:52 +0000
parents 7e870a4ec9bc
children 4caf8fbeb778
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
1 // QPSOL.h -*- C++ -*-
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
2 /*
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
3
296
3c23b8ea9099 [project @ 1994-01-17 02:49:15 by jwe]
jwe
parents: 289
diff changeset
4 Copyright (C) 1992, 1993, 1994 John W. Eaton
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
5
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
6 This file is part of Octave.
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
7
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
8 Octave is free software; you can redistribute it and/or modify it
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
9 under the terms of the GNU General Public License as published by the
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
10 Free Software Foundation; either version 2, or (at your option) any
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
11 later version.
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
12
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
13 Octave is distributed in the hope that it will be useful, but WITHOUT
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
16 for more details.
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
17
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
18 You should have received a copy of the GNU General Public License
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
19 along with Octave; see the file COPYING. If not, write to the Free
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
20 Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
21
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
22 */
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
23
382
e02d6b664394 [project @ 1994-03-09 21:08:03 by jwe]
jwe
parents: 296
diff changeset
24 #if !defined (octave_QPSOL_h)
e02d6b664394 [project @ 1994-03-09 21:08:03 by jwe]
jwe
parents: 296
diff changeset
25 #define octave_QPSOL_h 1
e02d6b664394 [project @ 1994-03-09 21:08:03 by jwe]
jwe
parents: 296
diff changeset
26
238
780cbbc57b7c [project @ 1993-11-30 20:23:04 by jwe]
jwe
parents: 3
diff changeset
27 #ifndef QPSOL_MISSING
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
28
238
780cbbc57b7c [project @ 1993-11-30 20:23:04 by jwe]
jwe
parents: 3
diff changeset
29 #include "Matrix.h"
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
30 #include "QP.h"
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
31
384
7e870a4ec9bc [project @ 1994-03-09 21:40:04 by jwe]
jwe
parents: 382
diff changeset
32 extern "C++" {
7e870a4ec9bc [project @ 1994-03-09 21:40:04 by jwe]
jwe
parents: 382
diff changeset
33
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
34 #ifndef Vector
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
35 #define Vector ColumnVector
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
36 #endif
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
37
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
38 class QPSOL_options
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
39 {
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
40 public:
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
41
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
42 QPSOL_options (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
43 QPSOL_options (const QPSOL_options& opt);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
44
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
45 QPSOL_options& operator = (const QPSOL_options& opt);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
46
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
47 ~QPSOL_options (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
48
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
49 void init (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
50 void copy (const QPSOL_options& opt);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
51
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
52 void set_default_options (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
53
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
54 void set_feasibility_tolerance (double);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
55 void set_infinite_bound (double);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
56 void set_iteration_limit (int);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
57 void set_print_level (int);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
58
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
59 double feasibility_tolerance (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
60 double infinite_bound (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
61 int iteration_limit (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
62 int print_level (void);
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
63
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
64 private:
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
65
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
66 double x_feasibility_tolerance;
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
67 double x_infinite_bound;
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
68 int x_iteration_limit;
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
69 int x_print_level;
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
70 };
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
71
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
72 class QPSOL : public QP, public QPSOL_options
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
73 {
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
74 public:
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
75
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
76 QPSOL (void) : QP ()
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
77 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
78
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
79 QPSOL (const Vector& x, const Matrix& H) : QP (x, H)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
80 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
81
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
82 QPSOL (const Vector& x, const Matrix& H, const Vector& c) : QP (x, H, c)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
83 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
84
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
85 QPSOL (const Vector& x, const Matrix& H, const Bounds& b) : QP (x, H, b)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
86 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
87
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
88 QPSOL (const Vector& x, const Matrix& H, const LinConst& lc) : QP (x, H, lc)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
89 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
90
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
91 QPSOL (const Vector& x, const Matrix& H, const Vector& c, const Bounds& b)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
92 : QP (x, H, c, b) { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
93
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
94 QPSOL (const Vector& x, const Matrix& H, const Vector& c, const LinConst& lc)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
95 : QP (x, H, c, lc) { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
96
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
97 QPSOL (const Vector& x, const Matrix& H, const Bounds& b, const LinConst& lc)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
98 : QP (x, H, b, lc) { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
99
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
100 QPSOL (const Vector& x, const Matrix& H, const Vector& c, const Bounds& b,
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
101 const LinConst& lc)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
102 : QP (x, H, c, b, lc) { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
103
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
104 QPSOL (const QPSOL& a);
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
105
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
106 QPSOL& operator = (const QPSOL& a);
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
107
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
108 Vector minimize (double& objf, int& inform, Vector& lambda);
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
109 };
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
110
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
111 inline QPSOL::QPSOL (const QPSOL& a) : QP (a.x, a.H, a.c, a.bnds, a.lc)
289
c23f50e61c58 [project @ 1994-01-13 06:25:58 by jwe]
jwe
parents: 238
diff changeset
112 { }
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
113
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
114 inline QPSOL&
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
115 QPSOL::operator = (const QPSOL& a)
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
116 {
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
117 x = a.x;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
118 H = a.H;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
119 c = a.c;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
120 bnds = a.bnds;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
121 lc = a.lc;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
122 return *this;
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
123 }
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
124
238
780cbbc57b7c [project @ 1993-11-30 20:23:04 by jwe]
jwe
parents: 3
diff changeset
125 #endif /* QPSOL_MISSING */
780cbbc57b7c [project @ 1993-11-30 20:23:04 by jwe]
jwe
parents: 3
diff changeset
126
382
e02d6b664394 [project @ 1994-03-09 21:08:03 by jwe]
jwe
parents: 296
diff changeset
127 } // extern "C++"
e02d6b664394 [project @ 1994-03-09 21:08:03 by jwe]
jwe
parents: 296
diff changeset
128
3
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
129 #endif
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
130
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
131 /*
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
132 ;;; Local Variables: ***
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
133 ;;; mode: C++ ***
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
134 ;;; page-delimiter: "^/\\*" ***
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
135 ;;; End: ***
9a4c07481e61 [project @ 1993-08-08 01:20:23 by jwe]
jwe
parents:
diff changeset
136 */