Documentation and improved bit-order treatment

2025-09-04 14:55:46 -07:00
parent 676629dfe5
commit 51dbdbf415
8 changed files with 105 additions and 32 deletions
--- a/TestAsconAEAD128.cry
+++ b/TestAsconAEAD128.cry
@@ -5,8 +5,7 @@ import AsconCipher

 testcase : {n, m} (fin m, fin n) => [128] -> [128] -> [8 * m] -> [8 * n] -> [8 * (m + 16)] -> Bit
 testcase K N P A C =
-    Ascon_AEAD128 (little_bytes K) (little_bytes N) (little_bytes A) (little_bytes P)
-    == little_bytes C
+    Ascon_AEAD128_bytes (split K) (split N) (split A) (split P) == split C

 property
  test1 = testcase 0x000102030405060708090A0B0C0D0E0F 0x101112131415161718191A1B1C1D1E1F [] 0x 0x4F9C278211BEC9316BF68F46EE8B2EC6