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.nonstiff;
24
25 import org.hipparchus.CalculusFieldElement;
26 import org.hipparchus.Field;
27 import org.hipparchus.ode.FieldEquationsMapper;
28 import org.hipparchus.ode.FieldODEStateAndDerivative;
29 import org.hipparchus.ode.nonstiff.interpolators.ClassicalRungeKuttaFieldStateInterpolator;
30 import org.hipparchus.util.MathArrays;
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56 public class ClassicalRungeKuttaFieldIntegrator<T extends CalculusFieldElement<T>>
57 extends FixedStepRungeKuttaFieldIntegrator<T> {
58
59
60 public static final String METHOD_NAME = ClassicalRungeKuttaIntegrator.METHOD_NAME;
61
62
63
64
65
66
67 public ClassicalRungeKuttaFieldIntegrator(final Field<T> field, final T step) {
68 super(field, METHOD_NAME, step);
69 }
70
71
72 @Override
73 public T[] getC() {
74 final T[] c = MathArrays.buildArray(getField(), 3);
75 c[0] = getField().getOne().newInstance(0.5);
76 c[1] = c[0];
77 c[2] = getField().getOne();
78 return c;
79 }
80
81
82 @Override
83 public T[][] getA() {
84 final T[][] a = MathArrays.buildArray(getField(), 3, -1);
85 for (int i = 0; i < a.length; ++i) {
86 a[i] = MathArrays.buildArray(getField(), i + 1);
87 }
88 a[0][0] = FieldExplicitRungeKuttaIntegrator.fraction(getField(), 1, 2);
89 a[1][0] = getField().getZero();
90 a[1][1] = a[0][0];
91 a[2][0] = getField().getZero();
92 a[2][1] = getField().getZero();
93 a[2][2] = getField().getOne();
94 return a;
95 }
96
97
98 @Override
99 public T[] getB() {
100 final T[] b = MathArrays.buildArray(getField(), 4);
101 b[0] = FieldExplicitRungeKuttaIntegrator.fraction(getField(), 1, 6);
102 b[1] = FieldExplicitRungeKuttaIntegrator.fraction(getField(), 1, 3);
103 b[2] = b[1];
104 b[3] = b[0];
105 return b;
106 }
107
108
109 @Override
110 protected ClassicalRungeKuttaFieldStateInterpolator<T>
111 createInterpolator(final boolean forward, T[][] yDotK,
112 final FieldODEStateAndDerivative<T> globalPreviousState,
113 final FieldODEStateAndDerivative<T> globalCurrentState,
114 final FieldEquationsMapper<T> mapper) {
115 return new ClassicalRungeKuttaFieldStateInterpolator<>(getField(), forward, yDotK,
116 globalPreviousState, globalCurrentState,
117 globalPreviousState, globalCurrentState,
118 mapper);
119 }
120
121 }