|
3998
|
1 CLASS = "DASPK" |
|
|
2 |
|
4044
|
3 INCLUDE = "DAE.h" |
|
|
4 |
|
3998
|
5 OPTION |
|
|
6 NAME = "absolute tolerance" |
|
|
7 TYPE = "Array<double>" |
|
|
8 SET_ARG_TYPE = "const $TYPE&" |
|
|
9 INIT_BODY |
|
|
10 $OPTVAR.resize (1); |
|
|
11 $OPTVAR(0) = ::sqrt (DBL_EPSILON); |
|
|
12 END_INIT_BODY |
|
|
13 SET_CODE |
|
|
14 void set_$OPT (double val) |
|
|
15 { |
|
|
16 $OPTVAR.resize (1); |
|
|
17 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (DBL_EPSILON); |
|
|
18 } |
|
|
19 |
|
|
20 void set_$OPT (const $TYPE& val) |
|
|
21 { $OPTVAR = val; } |
|
|
22 END_SET_CODE |
|
|
23 END_OPTION |
|
|
24 |
|
|
25 OPTION |
|
|
26 NAME = "relative tolerance" |
|
|
27 TYPE = "Array<double>" |
|
|
28 SET_ARG_TYPE = "const $TYPE&" |
|
|
29 INIT_BODY |
|
|
30 $OPTVAR.resize (1); |
|
|
31 $OPTVAR(0) = ::sqrt (DBL_EPSILON); |
|
|
32 END_INIT_BODY |
|
|
33 SET_CODE |
|
|
34 void set_$OPT (double val) |
|
|
35 { |
|
|
36 $OPTVAR.resize (1); |
|
|
37 $OPTVAR(0) = (val > 0.0) ? val : ::sqrt (DBL_EPSILON); |
|
|
38 } |
|
|
39 |
|
|
40 void set_$OPT (const $TYPE& val) |
|
|
41 { $OPTVAR = val; } |
|
|
42 END_SET_CODE |
|
|
43 END_OPTION |
|
|
44 |
|
|
45 OPTION |
|
4044
|
46 NAME = "compute consistent initial condition" |
|
|
47 TYPE = "int" |
|
|
48 INIT_VALUE = "0" |
|
|
49 SET_EXPR = "val" |
|
|
50 END_OPTION |
|
|
51 |
|
|
52 OPTION |
|
4047
|
53 NAME = "algebraic variables" |
|
|
54 TYPE = "Array<int>" |
|
|
55 SET_ARG_TYPE = const $TYPE& |
|
|
56 INIT_BODY |
|
|
57 $OPTVAR.resize (1); |
|
|
58 $OPTVAR(0) = 0; |
|
|
59 END_INIT_BODY |
|
|
60 SET_CODE |
|
|
61 void set_$OPT (int val) |
|
|
62 { |
|
|
63 $OPTVAR.resize (1); |
|
|
64 $OPTVAR(0) = val; |
|
|
65 } |
|
|
66 |
|
|
67 void set_$OPT (const $TYPE& val) |
|
|
68 { $OPTVAR = val; } |
|
|
69 END_SET_CODE |
|
|
70 END_OPTION |
|
|
71 |
|
|
72 OPTION |
|
4044
|
73 NAME = "enforce inequality constraints" |
|
|
74 TYPE = "int" |
|
|
75 INIT_VALUE = "0" |
|
|
76 SET_EXPR = "val" |
|
|
77 END_OPTION |
|
|
78 |
|
|
79 OPTION |
|
|
80 NAME = "inequality constraint types" |
|
|
81 TYPE = "Array<int>" |
|
|
82 SET_ARG_TYPE = const $TYPE& |
|
|
83 INIT_BODY |
|
|
84 $OPTVAR.resize (1); |
|
|
85 $OPTVAR(0) = 0; |
|
|
86 END_INIT_BODY |
|
|
87 SET_CODE |
|
|
88 void set_$OPT (int val) |
|
|
89 { |
|
|
90 $OPTVAR.resize (1); |
|
4047
|
91 $OPTVAR(0) = val; |
|
4044
|
92 } |
|
|
93 |
|
|
94 void set_$OPT (const $TYPE& val) |
|
|
95 { $OPTVAR = val; } |
|
|
96 END_SET_CODE |
|
|
97 END_OPTION |
|
|
98 |
|
|
99 OPTION |
|
4047
|
100 NAME = "exclude algebraic variables from error test" |
|
|
101 TYPE = "int" |
|
|
102 INIT_VALUE = "0" |
|
|
103 SET_EXPR = "val" |
|
|
104 END_OPTION |
|
|
105 |
|
|
106 OPTION |
|
|
107 NAME = "use initial condition heuristics" |
|
4044
|
108 TYPE = "int" |
|
|
109 INIT_VALUE = "0" |
|
|
110 SET_EXPR = "val" |
|
|
111 END_OPTION |
|
|
112 |
|
|
113 OPTION |
|
4047
|
114 NAME = "initial condition heuristics" |
|
|
115 TYPE = "Array<double>" |
|
|
116 SET_ARG_TYPE = "const $TYPE&" |
|
|
117 INIT_BODY |
|
|
118 $OPTVAR.resize (6, 0.0); |
|
|
119 $OPTVAR(0) = 5.0; |
|
|
120 $OPTVAR(1) = 6.0; |
|
|
121 $OPTVAR(2) = 5.0; |
|
|
122 $OPTVAR(3) = 0.0; |
|
|
123 $OPTVAR(4) = ::pow (DBL_EPSILON, 2.0/3.0); |
|
|
124 $OPTVAR(5) = 0.01; |
|
|
125 END_INIT_BODY |
|
4044
|
126 SET_EXPR = "val" |
|
|
127 END_OPTION |
|
|
128 |
|
|
129 OPTION |
|
3998
|
130 NAME = "initial step size" |
|
|
131 TYPE = "double" |
|
|
132 INIT_VALUE = "-1.0" |
|
|
133 SET_EXPR = "(val >= 0.0) ? val : -1.0" |
|
|
134 END_OPTION |
|
|
135 |
|
|
136 OPTION |
|
4044
|
137 NAME = "maximum order" |
|
|
138 TYPE = "int" |
|
|
139 INIT_VALUE = "-1" |
|
|
140 SET_EXPR = "val" |
|
|
141 END_OPTION |
|
|
142 |
|
|
143 OPTION |
|
3998
|
144 NAME = "maximum step size" |
|
|
145 TYPE = "double" |
|
|
146 INIT_VALUE = "-1.0" |
|
|
147 SET_EXPR = "(val >= 0.0) ? val : -1.0" |
|
|
148 END_OPTION |
|
|
149 |
|
|
150 OPTION |
|
4044
|
151 NAME = "print initial condition info" |
|
|
152 TYPE = "int" |
|
|
153 INIT_VALUE = "0" |
|
|
154 SET_EXPR = "val" |
|
|
155 END_OPTION |
|
|
156 |
