summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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)^