summaryrefslogtreecommitdiff
path: root/rk4.inc
blob: 4b1cc86a274f6b20dec8a6af1d7a3635e3b604d3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
  felders[2].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    0.5 * dT
  );
  felders[2].berechneAbleitungen(dX,iDX,pDNMax);

  if pruefeMaxDT(2,dTMax,dT,dTMin) then
    continue;

  felders[3].liKo(
    felders[aktuelleFelder],
    felders[2],
    0.5 * dT
  );
  felders[3].berechneAbleitungen(dX,iDX,pDNMax);

  if pruefeMaxDT(3,dTMax,dT,dTMin) then
    continue;

  felders[4].liKo(
    felders[aktuelleFelder],
    felders[3],
    1 * dT
  );
  felders[4].berechneAbleitungen(dX,iDX,pDNMax);

  if pruefeMaxDT(4,dTMax,dT,dTMin) then
    continue;

  felders[1-aktuelleFelder].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[2],
    felders[3],
    felders[4],
    1/6 * dT,
    1/3 * dT,
    1/3 * dT,
    1/6 * dT
  );