summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2015-09-30 12:51:58 +0200
committerErich Eckner <git@eckner.net>2015-09-30 12:51:58 +0200
commit5dd58583367a578d8ad82ebcd5c9f93c768241b9 (patch)
treef9053ae7fbdadaef9a4fa5a26d5d376a4d4b4dd0
parentb9c251fbb813025ed2f13c1ac5b6b90243385b1b (diff)
downloadPlasmapropagation-5dd58583367a578d8ad82ebcd5c9f93c768241b9.tar.xz
es werden nun nur die Felder linearkombiniert, die auch Ableitungen
haben.
-rwxr-xr-xgenLikoInc2
-rw-r--r--linearkombination.inc2
2 files changed, 2 insertions, 2 deletions
diff --git a/genLikoInc b/genLikoInc
index 2c0120f..ab0035d 100755
--- a/genLikoInc
+++ b/genLikoInc
@@ -65,7 +65,7 @@ echo "var" >> ${file}
echo " i,j: longint;" >> ${file}
echo " emF: tEMFeldGroesze;" >> ${file}
echo "begin" >> ${file}
-echo " for emF:=low(tEMFeldGroesze) to high(tEMFeldGroesze) do" >> ${file}
+echo " for emF:=erstesEMFMitAbleitung to letztesEMFMitAbleitung do" >> ${file}
echo " for i:=0 to aX-1 do" >> ${file}
echo " (emFelder[emF,false]+i)^:=" >> ${file}
echo -ne " (in1.emFelder[emF,false]+i)^" >> ${file}
diff --git a/linearkombination.inc b/linearkombination.inc
index 5727f04..05aeeee 100644
--- a/linearkombination.inc
+++ b/linearkombination.inc
@@ -67,7 +67,7 @@ var
i,j: longint;
emF: tEMFeldGroesze;
begin
- for emF:=low(tEMFeldGroesze) to high(tEMFeldGroesze) do
+ for emF:=erstesEMFMitAbleitung to letztesEMFMitAbleitung do
for i:=0 to aX-1 do
(emFelder[emF,false]+i)^:=
(in1.emFelder[emF,false]+i)^