Unify into a single implementation file

This commit is contained in:
Eric Mertens
2025-09-04 18:30:47 -07:00
parent 51dbdbf415
commit be65d0dd4e
7 changed files with 162 additions and 118 deletions

View File

@@ -1,9 +1,9 @@
module TestAsconHash256 where
import AsconHash
import Ascon
testcase : {n} (fin n) => [8*n] -> [256] -> Bool
testcase M D = Ascon_Hash256_bytes (split M) == split D
testcase M D = Hash256_bytes (split M) == split D
property
test1 = testcase [] 0x0B3BE5850F2F6B98CAF29F8FDEA89B64A1FA70AA249B8F839BD53BAA304D92B2