annotate liboctave/LSODE-opts.in @ 9245:16f53d29049f

update copyright notices
author John W. Eaton <jwe@octave.org>
date Fri, 22 May 2009 10:46:00 -0400
parents 8970b4b10e9f
children 12884915a8e4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9245
16f53d29049f update copyright notices
John W. Eaton <jwe@octave.org>
parents: 9067
diff changeset
1 # Copyright (C) 2002, 2005, 2007, 2009 John W. Eaton
7017
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
2 #
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
3 # This file is part of Octave.
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
4 #
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
5 # Octave is free software; you can redistribute it and/or modify it
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
6 # under the terms of the GNU General Public License as published by the
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
7 # Free Software Foundation; either version 3 of the License, or (at
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
8 # your option) any later version.
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
9 #
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
10 # Octave is distributed in the hope that it will be useful, but WITHOUT
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
11 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
12 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
13 # for more details.
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
14 #
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
15 # You should have received a copy of the GNU General Public License
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
16 # along with Octave; see the file COPYING. If not, see
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
17 # <http://www.gnu.org/licenses/>.
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7007
diff changeset
18
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
19 CLASS = "LSODE"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
20
4044
9678c5526190 [project @ 2002-08-15 16:54:55 by jwe]
jwe
parents: 3998
diff changeset
21 INCLUDE = "ODE.h"
9678c5526190 [project @ 2002-08-15 16:54:55 by jwe]
jwe
parents: 3998
diff changeset
22
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
23 OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
24 NAME = "absolute tolerance"
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
25 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
26 Absolute tolerance. May be either vector or scalar. If a vector, it
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
27 must match the dimension of the state vector.
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
28 END_DOC_ITEM
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
29 TYPE = "Array<double>"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
30 SET_ARG_TYPE = "const $TYPE&"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
31 INIT_BODY
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
32 $OPTVAR.resize (1);
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
33 $OPTVAR(0) = ::sqrt (DBL_EPSILON);
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
34 END_INIT_BODY
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
35 SET_CODE
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
36 void set_$OPT (double val)
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
37 {
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
38 $OPTVAR.resize (1);
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
39 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (DBL_EPSILON);
4049
a35a3c5d4740 [project @ 2002-08-16 08:54:31 by jwe]
jwe
parents: 4044
diff changeset
40 reset = true;
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
41 }
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
42
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
43 void set_$OPT (const $TYPE& val)
4049
a35a3c5d4740 [project @ 2002-08-16 08:54:31 by jwe]
jwe
parents: 4044
diff changeset
44 { $OPTVAR = val; reset = true; }
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
45 END_SET_CODE
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
46 END_OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
47
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
48 OPTION
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
49 NAME = "relative tolerance"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
50 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
51 Relative tolerance parameter. Unlike the absolute tolerance, this
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
52 parameter may only be a scalar.
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
53
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
54 The local error test applied at each integration step is
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
55
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
56 @example
9067
8970b4b10e9f Cleanup documentation for quad.texi and diffeq.texi
Rik <rdrider0-list@yahoo.com>
parents: 7081
diff changeset
57 @group
7081
503001863427 [project @ 2007-10-31 01:08:14 by jwe]
jwe
parents: 7017
diff changeset
58 abs (local error in x(i)) <= ...
503001863427 [project @ 2007-10-31 01:08:14 by jwe]
jwe
parents: 7017
diff changeset
59 rtol * abs (y(i)) + atol(i)
9067
8970b4b10e9f Cleanup documentation for quad.texi and diffeq.texi
Rik <rdrider0-list@yahoo.com>
parents: 7081
diff changeset
60 @end group
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
61 @end example
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
62 END_DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
63 TYPE = "double"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
64 INIT_VALUE = "::sqrt (DBL_EPSILON)"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
65 SET_EXPR = "(val > 0.0) ? val : ::sqrt (DBL_EPSILON)"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
66 END_OPTION
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
67
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
68 OPTION
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
69 NAME = "integration method"
4231
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
70 DOC_ITEM
7007
6304d9ea0a30 [project @ 2007-10-11 16:26:36 by jwe]
jwe
parents: 5275
diff changeset
71 A string specifying the method of integration to use to solve the ODE
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
72 system. Valid values are
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
73
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
74 @table @asis
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
75 @item \"adams\"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
76 @itemx \"non-stiff\"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
77 No Jacobian used (even if it is available).
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
78 @item \"bdf\"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
79 @item \"stiff\"
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
80 Use stiff backward differentiation formula (BDF) method. If a
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
81 function to compute the Jacobian is not supplied, @code{lsode} will
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
82 compute a finite difference approximation of the Jacobian matrix.
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
83 @end table
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
84 END_DOC_ITEM
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
85 TYPE = "std::string"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
86 SET_ARG_TYPE = "const $TYPE&"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
87 INIT_VALUE = ""stiff""
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
88 SET_BODY
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
89 if (val == "stiff" || val == "bdf")
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
90 $OPTVAR = "stiff";
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
91 else if (val == "non-stiff" || val == "adams")
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
92 $OPTVAR = "non-stiff";
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
93 else
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
94 (*current_liboctave_error_handler)
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
95 ("lsode_options: method must be \"stiff\", \"bdf\", \"non-stiff\", or \"adams\"");
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
96 END_SET_BODY
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
97 END_OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
98
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
99 OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
100 NAME = "initial step size"
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
101 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
102 The step size to be attempted on the first step (default is determined
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
103 automatically).
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
104 END_DOC_ITEM
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
105 TYPE = "double"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
106 INIT_VALUE = "-1.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
107 SET_EXPR = "(val >= 0.0) ? val : -1.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
108 END_OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
109
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
110 OPTION
4231
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
111 NAME = "maximum order"
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
112 DOC_ITEM
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
113 Restrict the maximum order of the solution method. If using the Adams
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
114 method, this option must be between 1 and 12. Otherwise, it must be
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
115 between 1 and 5, inclusive.
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
116 END_DOC_ITEM
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 4231
diff changeset
117 TYPE = "octave_idx_type"
4231
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
118 INIT_VALUE = "-1"
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
119 SET_EXPR = "val"
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
120 END_OPTION
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
121
1032fb9ec0d1 [project @ 2002-12-19 19:58:29 by jwe]
jwe
parents: 4051
diff changeset
122 OPTION
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
123 NAME = "maximum step size"
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
124 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
125 Setting the maximum stepsize will avoid passing over very large
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
126 regions (default is not specified).
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
127 END_DOC_ITEM
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
128 TYPE = "double"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
129 INIT_VALUE = "-1.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
130 SET_EXPR = "(val >= 0.0) ? val : -1.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
131 END_OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
132
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
133 OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
134 NAME = "minimum step size"
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
135 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
136 The minimum absolute step size allowed (default is 0).
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
137 END_DOC_ITEM
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
138 TYPE = "double"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
139 INIT_VALUE = "0.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
140 SET_EXPR = "(val >= 0.0) ? val : 0.0"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
141 END_OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
142
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
143 OPTION
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
144 NAME = "step limit"
4051
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
145 DOC_ITEM
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
146 Maximum number of steps allowed (default is 100000).
b79da8779a0e [project @ 2002-08-17 19:38:32 by jwe]
jwe
parents: 4049
diff changeset
147 END_DOC_ITEM
5275
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe]
jwe
parents: 4231
diff changeset
148 TYPE = "octave_idx_type"
3998
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
149 INIT_VALUE = "100000"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
150 SET_EXPR = "val"
f6df65db67f9 [project @ 2002-07-24 18:10:39 by jwe]
jwe
parents:
diff changeset
151 END_OPTION