summaryrefslogtreecommitdiff
path: root/rk108.inc
blob: c4a88682d1fd69dc82a3a0ff10df214a268cd26d (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
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
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
  felders[2].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    0.1 * dT
  );
  felders[2].berechneAbleitungen;


  felders[3].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[2],
    -0.91517656137529144052001501927534215431895138766436972056466 * dT,
    1.45453440217827322805250021715664459117622483736537873607016 * dT
  );
  felders[3].berechneAbleitungen;


  felders[4].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[3],
    0.202259190301118170324681949205488413821477543637878380814562 * dT,
    0.606777570903354510974045847616465241464432630913635142443687 * dT
  );
  felders[4].berechneAbleitungen;


  felders[5].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[3],
    felders[4],
    0.184024714708643575149100693471120664216774047979591417844635 * dT,
    0.197966831227192369068141770510388793370637287463360401555746 * dT,
    -0.0729547847313632629185146671595558023015011608914382961421311 * dT
  );
  felders[5].berechneAbleitungen;


  felders[6].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[4],
    felders[5],
    0.0879007340206681337319777094132125475918886824944548534041378 * dT,
    0.410459702520260645318174895920453426088035325902848695210406 * dT,
    0.482713753678866489204726942976896106809132737721421333413261 * dT
  );
  felders[6].berechneAbleitungen;


  felders[7].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[4],
    felders[5],
    felders[6],
    0.085970050490246030218848022594580840141113261563660022259388 * dT,
    0.330885963040722183948884057658753173648240154838402033448632 * dT,
    0.48966295730945019284450701113589820117801547843379009721079 * dT,
    -0.0731856375070850736789057580558988816340355615025188195854775 * dT
  );
  felders[7].berechneAbleitungen;


  felders[8].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[5],
    felders[6],
    felders[7],
    0.120930449125333720660378854927668953958938996999703678812621 * dT,
    0.260124675758295622809007617838335174368108756484693361887839 * dT,
    0.0325402621549091330158899334391231259332716675992700000776101 * dT,
    -0.0595780211817361001560122202563305121444953672762930724538856 * dT
  );
  felders[8].berechneAbleitungen;


  felders[9].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[6],
    felders[7],
    felders[8],
    0.110854379580391483508936171010218441909425780168656559807038 * dT,
    -0.0605761488255005587620924953655516875526344415354339234619466 * dT,
    0.32176370560177839010089879904987890408140436860307712925111 * dT,
    0.51048572560806303157775901228512341674467213703175235406759 * dT
  );
  felders[9].berechneAbleitungen;


  felders[10].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    0.112054414752879004829715002761802363003717611158172229329393 * dT,
    -0.144942775902865915672349828340980777181668499748506838876185 * dT,
    -0.333269719096256706589705211415746871709467423992115497968724 * dT,
    0.499269229556880061353316843969978567860276816592673201240332 * dT,
    0.50950460892968610423609869004538625398664323235298960218506 * dT
  );
  felders[10].berechneAbleitungen;


  felders[11].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    felders[10],
    0.113976783964185986138004186736901163890724752541486831640341 * dT,
    -0.0768813364203356938586214289120895270821349023390922987406384 * dT,
    0.239527360324390649107711455271882373019741311201004119339563 * dT,
    0.397774662368094639047830462488952104564716416343454639902613 * dT,
    0.0107558956873607455550609147441477450257136782823280838547024 * dT,
    -0.327769124164018874147061087350233395378262992392394071906457 * dT
  );
  felders[11].berechneAbleitungen;


  felders[12].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    felders[10],
    felders[11],
    0.0798314528280196046351426864486400322758737630423413945356284 * dT,
    -0.0520329686800603076514949887612959068721311443881683526937298 * dT,
    -0.0576954146168548881732784355283433509066159287152968723021864 * dT,
    0.19478191571210416497630626214738287115614292135440936473809 * dT,
    0.145384923188325069727524825977071194859203467568236523866582 * dT,
    -0.0782942710351670777553986729725692447252077047239160551335016 * dT,
    -0.114503299361098912184303164290554670970133218405658122674674 * dT
  );
  felders[12].berechneAbleitungen;


  felders[13].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[4],
    felders[5],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    felders[10],
    felders[11],
    felders[12],
    0.985115610164857280120041500306517278413646677314195559520529 * dT,
    0.330885963040722183948884057658753173648240154838402033448632 * dT,
    0.48966295730945019284450701113589820117801547843379009721079 * dT,
    -1.37896486574843567582112720930751902353904327148559471526397 * dT,
    -0.861164195027635666673916999665534573351026060987427093314412 * dT,
    5.78428813637537220022999785486578436006872789689499172601856 * dT,
    3.28807761985103566890460615937314805477268252903342356581925 * dT,
    -2.38633905093136384013422325215527866148401465975954104585807 * dT,
    -3.25479342483643918654589367587788726747711504674780680269911 * dT,
    -2.16343541686422982353954211300054820889678036420109999154887 * dT
  );
  felders[13].berechneAbleitungen;


  felders[14].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[3],
    felders[4],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    felders[10],
    felders[11],
    felders[12],
    felders[13],
    0.89508029577163289104961313233658513814815627924156134599171 * dT,
    0.197966831227192369068141770510388793370637287463360401555746 * dT,
    -0.0729547847313632629185146671595558023015011608914382961421311 * dT,
    -0.851236239662007619739049371445966793289359722875702227166105 * dT,
    0.398320112318533301719718614174373643336480918103773904231856 * dT,
    3.63937263181035606029412920047090044132027387893977804176229 * dT,
    1.54822877039830322365301663075174564919981736348973496313065 * dT,
    -2.12221714704053716026062427460427261025318461146260124401561 * dT,
    -1.58350398545326172713384349625753212757269188934434237975291 * dT,
    -1.71561608285936264922031819751349098912615880827551992973034 * dT,
    -0.0244036405750127452135415444412216875465593598370910566069132 * dT
  );
  felders[14].berechneAbleitungen;


  felders[15].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[2],
    felders[5],
    felders[7],
    felders[13],
    felders[14],
    -0.91517656137529144052001501927534215431895138766436972056466 * dT,
    1.45453440217827322805250021715664459117622483736537873607016 * dT,
    -0.777333643644968233538931228575302137803351053629547286334469 * dT,
    -0.0910895662155176069593203555807484200111889091770101799647985 * dT,
    0.0910895662155176069593203555807484200111889091770101799647985 * dT,
    0.777333643644968233538931228575302137803351053629547286334469 * dT
  );
  felders[15].berechneAbleitungen;


  felders[16].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[3],
    felders[15],
    0.1 * dT,
    -0.157178665799771163367058998273128921867183754126709419409654 * dT,
    0.157178665799771163367058998273128921867183754126709419409654 * dT
  );
  felders[16].berechneAbleitungen;


  felders[17].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[2],
    felders[3],
    felders[5],
    felders[6],
    felders[7],
    felders[8],
    felders[9],
    felders[10],
    felders[11],
    felders[12],
    felders[13],
    felders[14],
    felders[15],
    felders[16],
    0.181781300700095283888472062582262379650443831463199521664945 * dT,
    0.675 * dT,
    0.34275815984718983994222055341385087174233873470395891993726 * dT,
    0.259111214548322744512977076191767379267783684543182428778156 * dT,
    -0.358278966717952089048961276721979397739750634673268802484271 * dT,
    -1.0459489594088330609505006875640990513158812317237848928608 * dT,
    0.930327845415626983292300564432428777137601651182965794680397 * dT,
    1.77950959431708102446142106794824453926275743243327790536 * dT,
    0.1 * dT,
    -0.282547569539044081612477785222287276408489375976211189952877 * dT,
    -0.159327350119972549169261984373485859278031542127551931461821 * dT,
    -0.145515894647001510860991961081084111308650130578626404945571 * dT,
    -0.259111214548322744512977076191767379267783684543182428778156 * dT,
    -0.34275815984718983994222055341385087174233873470395891993726 * dT,
    -0.675 * dT
  );
  felders[17].berechneAbleitungen;


  felders[1-aktuelleFelder].liKo(
    felders[aktuelleFelder],
    felders[aktuelleFelder],
    felders[2],
    felders[3],
    felders[5],
    felders[7],
    felders[9],
    felders[10],
    felders[11],
    felders[12],
    felders[13],
    felders[14],
    felders[15],
    felders[16],
    felders[17],
    0.0333333333333333333333333333333333333333333333333333333333333 * dT,
    0.025 * dT,
    0.0333333333333333333333333333333333333333333333333333333333333 * dT,
    0.05 * dT,
    0.04 * dT,
    0.189237478148923490158306404106012326238162346948625830327194 * dT,
    0.277429188517743176508360262560654340428504319718040836339472 * dT,
    0.277429188517743176508360262560654340428504319718040836339472 * dT,
    0.189237478148923490158306404106012326238162346948625830327194 * dT,
    -0.04 * dT,
    -0.05 * dT,
    -0.0333333333333333333333333333333333333333333333333333333333333 * dT,
    -0.025 * dT,
    0.0333333333333333333333333333333333333333333333333333333333333 * dT
  );