1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 package org.hipparchus.ode;
24
25 import java.util.ArrayList;
26 import java.util.List;
27
28 import org.hipparchus.CalculusFieldElement;
29 import org.hipparchus.exception.LocalizedCoreFormats;
30 import org.hipparchus.exception.MathIllegalArgumentException;
31 import org.hipparchus.exception.MathIllegalStateException;
32 import org.hipparchus.ode.sampling.FieldODEStepHandler;
33 import org.hipparchus.ode.sampling.FieldODEStateInterpolator;
34 import org.hipparchus.util.FastMath;
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84 public class FieldDenseOutputModel<T extends CalculusFieldElement<T>>
85 implements FieldODEStepHandler<T> {
86
87
88 private T initialTime;
89
90
91 private T finalTime;
92
93
94 private boolean forward;
95
96
97 private int index;
98
99
100 private List<FieldODEStateInterpolator<T>> steps;
101
102
103
104
105 public FieldDenseOutputModel() {
106 steps = new ArrayList<>();
107 initialTime = null;
108 finalTime = null;
109 forward = true;
110 index = 0;
111 }
112
113
114
115
116
117
118
119
120
121
122
123 public void append(final FieldDenseOutputModel<T> model)
124 throws MathIllegalArgumentException, MathIllegalStateException {
125
126 if (model.steps.isEmpty()) {
127 return;
128 }
129
130 if (steps.isEmpty()) {
131 initialTime = model.initialTime;
132 forward = model.forward;
133 } else {
134
135
136 final FieldODEStateAndDerivative<T> s1 = steps.get(0).getPreviousState();
137 final FieldODEStateAndDerivative<T> s2 = model.steps.get(0).getPreviousState();
138 checkDimensionsEquality(s1.getPrimaryStateDimension(), s2.getPrimaryStateDimension());
139 checkDimensionsEquality(s1.getNumberOfSecondaryStates(), s2.getNumberOfSecondaryStates());
140 for (int i = 0; i < s1.getNumberOfSecondaryStates(); ++i) {
141 checkDimensionsEquality(s1.getSecondaryStateDimension(i), s2.getSecondaryStateDimension(i));
142 }
143
144 if (forward ^ model.forward) {
145 throw new MathIllegalArgumentException(LocalizedODEFormats.PROPAGATION_DIRECTION_MISMATCH);
146 }
147
148 final FieldODEStateInterpolator<T> lastInterpolator = steps.get(index);
149 final T current = lastInterpolator.getCurrentState().getTime();
150 final T previous = lastInterpolator.getPreviousState().getTime();
151 final T step = current.subtract(previous);
152 final T gap = model.getInitialTime().subtract(current);
153 if (gap.abs().subtract(step.abs().multiply(1.0e-3)).getReal() > 0) {
154 throw new MathIllegalArgumentException(LocalizedODEFormats.HOLE_BETWEEN_MODELS_TIME_RANGES,
155 gap.norm());
156 }
157
158 }
159
160 for (FieldODEStateInterpolator<T> interpolator : model.steps) {
161 steps.add(interpolator);
162 }
163
164 index = steps.size() - 1;
165 finalTime = (steps.get(index)).getCurrentState().getTime();
166
167 }
168
169
170
171
172
173
174 private void checkDimensionsEquality(final int d1, final int d2)
175 throws MathIllegalArgumentException {
176 if (d1 != d2) {
177 throw new MathIllegalArgumentException(LocalizedCoreFormats.DIMENSIONS_MISMATCH,
178 d2, d1);
179 }
180 }
181
182
183 @Override
184 public void init(final FieldODEStateAndDerivative<T> initialState, final T t) {
185 initialTime = initialState.getTime();
186 finalTime = t;
187 forward = true;
188 index = 0;
189 steps.clear();
190 }
191
192
193 @Override
194 public void handleStep(final FieldODEStateInterpolator<T> interpolator) {
195
196 if (steps.isEmpty()) {
197 initialTime = interpolator.getPreviousState().getTime();
198 forward = interpolator.isForward();
199 }
200
201 steps.add(interpolator);
202 }
203
204
205 @Override
206 public void finish(FieldODEStateAndDerivative<T> finalState) {
207 finalTime = finalState.getTime();
208 index = steps.size() - 1;
209 }
210
211
212
213
214
215 public T getInitialTime() {
216 return initialTime;
217 }
218
219
220
221
222
223 public T getFinalTime() {
224 return finalTime;
225 }
226
227
228
229
230
231
232 public FieldODEStateAndDerivative<T> getInterpolatedState(final T time) {
233
234
235 int iMin = 0;
236 final FieldODEStateInterpolator<T> sMin = steps.get(iMin);
237 T tMin = sMin.getPreviousState().getTime().add(sMin.getCurrentState().getTime()).multiply(0.5);
238
239 int iMax = steps.size() - 1;
240 final FieldODEStateInterpolator<T> sMax = steps.get(iMax);
241 T tMax = sMax.getPreviousState().getTime().add(sMax.getCurrentState().getTime()).multiply(0.5);
242
243
244
245 if (locatePoint(time, sMin) <= 0) {
246 index = iMin;
247 return sMin.getInterpolatedState(time);
248 }
249 if (locatePoint(time, sMax) >= 0) {
250 index = iMax;
251 return sMax.getInterpolatedState(time);
252 }
253
254
255 while (iMax - iMin > 5) {
256
257
258 final FieldODEStateInterpolator<T> si = steps.get(index);
259 final int location = locatePoint(time, si);
260 if (location < 0) {
261 iMax = index;
262 tMax = si.getPreviousState().getTime().add(si.getCurrentState().getTime()).multiply(0.5);
263 } else if (location > 0) {
264 iMin = index;
265 tMin = si.getPreviousState().getTime().add(si.getCurrentState().getTime()).multiply(0.5);
266 } else {
267
268 return si.getInterpolatedState(time);
269 }
270
271
272 final int iMed = (iMin + iMax) / 2;
273 final FieldODEStateInterpolator<T> sMed = steps.get(iMed);
274 final T tMed = sMed.getPreviousState().getTime().add(sMed.getCurrentState().getTime()).multiply(0.5);
275
276 if (tMed.subtract(tMin).abs().subtract(1.0e-6).getReal() < 0 ||
277 tMax.subtract(tMed).abs().subtract(1.0e-6).getReal() < 0) {
278
279 index = iMed;
280 } else {
281
282
283
284 final T d12 = tMax.subtract(tMed);
285 final T d23 = tMed.subtract(tMin);
286 final T d13 = tMax.subtract(tMin);
287 final T dt1 = time.subtract(tMax);
288 final T dt2 = time.subtract(tMed);
289 final T dt3 = time.subtract(tMin);
290 final T iLagrange = dt2.multiply(dt3).multiply(d23).multiply(iMax).
291 subtract(dt1.multiply(dt3).multiply(d13).multiply(iMed)).
292 add( dt1.multiply(dt2).multiply(d12).multiply(iMin)).
293 divide(d12.multiply(d23).multiply(d13));
294 index = (int) FastMath.rint(iLagrange.getReal());
295 }
296
297
298 final int low = FastMath.max(iMin + 1, (9 * iMin + iMax) / 10);
299 final int high = FastMath.min(iMax - 1, (iMin + 9 * iMax) / 10);
300 if (index < low) {
301 index = low;
302 } else if (index > high) {
303 index = high;
304 }
305
306 }
307
308
309 index = iMin;
310 while (index <= iMax && locatePoint(time, steps.get(index)) > 0) {
311 ++index;
312 }
313
314 return steps.get(index).getInterpolatedState(time);
315
316 }
317
318
319
320
321
322
323
324
325 private int locatePoint(final T time, final FieldODEStateInterpolator<T> interval) {
326 if (forward) {
327 if (time.subtract(interval.getPreviousState().getTime()).getReal() < 0) {
328 return -1;
329 } else if (time.subtract(interval.getCurrentState().getTime()).getReal() > 0) {
330 return +1;
331 } else {
332 return 0;
333 }
334 }
335 if (time.subtract(interval.getPreviousState().getTime()).getReal() > 0) {
336 return -1;
337 } else if (time.subtract(interval.getCurrentState().getTime()).getReal() < 0) {
338 return +1;
339 } else {
340 return 0;
341 }
342 }
343
344 }