Unify into a single implementation file

2025-09-04 18:30:47 -07:00
parent 51dbdbf415
commit be65d0dd4e
7 changed files with 162 additions and 118 deletions
--- a/TestAsconXOF128.cry
+++ b/TestAsconXOF128.cry
@@ -1,9 +1,9 @@
 module TestAsconXOF128 where

-import AsconHash
+import Ascon

 testcase : {r, n} (fin n, fin r) => [8*n] -> [8*r] -> Bool
-testcase M D = Ascon_XOF128_bytes (split M) == split D
+testcase M D = XOF128_bytes (split M) == split D

 property
  test1 = testcase [] 0x473D5E6164F58B39DFD84AACDB8AE42EC2D91FED33388EE0D960D9B3993295C6AD77855A5D3B13FE6AD9E6098988373AF7D0956D05A8F1665D2C67D1A3AD10FF