summaryrefslogtreecommitdiff
path: root/pseudohadamard.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2017-07-18 09:26:29 +0200
committerErich Eckner <git@eckner.net>2017-07-20 12:11:16 +0200
commit2798b395bc067293d3a7d338a792224da17854e3 (patch)
tree2f2edf0b5944a0e01b77029516b3236695cd92be /pseudohadamard.pas
parent1d177b0eb1bcbea486318d5a68dc5f7c1b0e39df (diff)
downloadunits-2798b395bc067293d3a7d338a792224da17854e3.tar.xz
homogenisiere Grosz-Klein-Schreibung
Diffstat (limited to 'pseudohadamard.pas')
-rw-r--r--pseudohadamard.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/pseudohadamard.pas b/pseudohadamard.pas
index b00e7aa..e845d55 100644
--- a/pseudohadamard.pas
+++ b/pseudohadamard.pas
@@ -17,7 +17,7 @@ var
buff: mpz_t;
begin
if length(daten)<>round(power(2,round(ln(length(daten))/ln(2)))) then
- raise Exception.create('Die Länge der Daten für eine Pseudohadamardtransformation muss eine Zweierpotenz sein (und nicht '+inttostr(length(daten))+')!');
+ raise exception.create('Die Länge der Daten für eine Pseudohadamardtransformation muss eine Zweierpotenz sein (und nicht '+intToStr(length(daten))+')!');
mpz_init(buff);
pseudoHadamardTransformation(daten,length(daten),0,modul,buff,invers);
mpz_clear(buff);