summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2017-12-05 09:26:56 +0100
committerErich Eckner <git@eckner.net>2017-12-05 09:26:56 +0100
commitd17acc6af7743842ac17b37ecc7b5830ad8921ba (patch)
tree9f72db312a9a75a50010cff8ce6bc533ee1d66c5
parent879ca98a38e585b48b6ba76d55b918e4b3768171 (diff)
downloadunits-d17acc6af7743842ac17b37ecc7b5830ad8921ba.tar.xz
matheunit.pas: use longestOrdinal now
-rw-r--r--matheunit.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/matheunit.pas b/matheunit.pas
index e8a1e1e..f49cf40 100644
--- a/matheunit.pas
+++ b/matheunit.pas
@@ -53,7 +53,7 @@ function formelnAuswerten(s: string; kvs: tKnownValues; cbgv: tCallBackGetValue)
function knownValue(nam: string; val: extended): tKnownValue;
function berechneEinheitsZelle(invarianz,modulus: tInt64Point): tInt64Point;
function ggT(a,b: int64): int64;
-function ermittleAnstieg(dat: string; xSpalte,ySpalte: int64): extended;
+function ermittleAnstieg(dat: string; xSpalte,ySpalte: longestOrdinal): extended;
implementation
@@ -853,7 +853,7 @@ begin // a <= b
result:=b;
end;
-function ermittleAnstieg(dat: string; xSpalte,ySpalte: int64): extended;
+function ermittleAnstieg(dat: string; xSpalte,ySpalte: longestOrdinal): extended;
var
f: textFile;
s: string;