From d17acc6af7743842ac17b37ecc7b5830ad8921ba Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Tue, 5 Dec 2017 09:26:56 +0100 Subject: matheunit.pas: use longestOrdinal now --- matheunit.pas | 4 ++-- 1 file 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; -- cgit v1.2.3-70-g09d2