summaryrefslogtreecommitdiff
path: root/pseudohadamard.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2015-07-22 10:24:35 +0200
committerErich Eckner <git@eckner.net>2015-07-22 10:24:35 +0200
commitf4e1f1992b8ac7e5e9fb57be0774114226a12adb (patch)
treef9416e9e124c3150f384fb5c64c6c71a7daf9708 /pseudohadamard.pas
parentffb35ffece4f0239cf9fcecbfba5329d7b5dc98d (diff)
downloadunits-f4e1f1992b8ac7e5e9fb57be0774114226a12adb.tar.xz
kleine Textaenderung
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 654dc0e..b00e7aa 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);