def open_key_bad

bend-collections-laws-crypto@1.0.0.0 · proofs/crypto/aes/proof.bend:100

import Base
import bend-collections-laws-crypto@1.0.0.0/src/crypto/aes/aes.bend as A
import bend-collections-laws-crypto@1.0.0.0/src/crypto/aes/gcm.bend as GI

100def open_key_bad(+m: Maybe<&2, A.Schedule>, +nonce: List<&2, U32>, +h: {Nat.is_eq(List.length(&2, U32, nonce), 12n) == False{} : Bool}, +aad: List<&2, U32>, +ct: List<&2, U32>) -> {GI.open_key(m, nonce, aad, ct) == None{} : Maybe<&2, List<&2, U32>>}:
101  match m:
102    case None{}:
103      {==}
104    case Some{s}:
105      open_nonce_bad(s, nonce, h, aad, ct)