diff options
| -rw-r--r-- | matheunit.pas | 4 |
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; |