def public_expansion_matches

qasim-bend-kit@0.1.0.2 · proof/AES_TraceBridgeProof.bend:31

import Base
import qasim-bend-kit@0.1.0.2/libs/AES256GCMCore.bend as Core

31def public_expansion_matches(+key: List<&2, U32>, +expected: List<&2, U32>,
32    same: {Core.aes_expand_key(52n, key) == expected : List<&2, U32>}) ->
33    {Core.aes256_expand(key) == expected : List<&2, U32>}:
34    Equal.trans(List<&2, U32>, Core.aes256_expand(key), Core.aes_expand_key(52n, key), expected,
35        Equal.cong((@+input: List<&2, U32> -> List<&2, U32>), List<&2, U32>,
36            function => function(key), Core.aes256_expand,
37            +input => Core.aes_expand_key(52n, input), expansion_alias()), same)