val initialize_key : option aead_key -> Tot cipher_state
val initialize_key : option aead_key -> Tot cipher_state
let initialize_key k = { k = k; n = 0; }
module Spec.Noise.Base.Definitions

open FStar.Mul

open Lib.IntTypes
open Lib.RawIntTypes
open Lib.ByteSequence
open Lib.Sequence

open Spec.Noise.CryptoPrimitives

#set-options "--z3rlimit 15 --fuel 0 --ifuel 1"

/// Small helper for the proofs


(*** Cipher state *)
/
Spec.Noise.CryptoPrimitives.fsti.checked prims.fst.checked Lib.Sequence.fsti.checked Lib.RawIntTypes.fsti.checked Lib.IntTypes.fsti.checked Lib.ByteSequence.fsti.checked FStar.Seq.fst.checked FStar.Pervasives.Native.fst.checked FStar.Pervasives.fsti.checked FStar.Mul.fst.checked FStar.List.Tot.fst.checked
Spec.Noise.Base.Definitions.fst
k: FStar.Pervasives.Native.option Spec.Noise.CryptoPrimitives.aead_key
  -> Spec.Noise.Base.Definitions.cipher_state
FStar.Pervasives.Native.option Spec.Noise.CryptoPrimitives.aead_key Spec.Noise.Base.Definitions.Mkcipher_state Spec.Noise.Base.Definitions.cipher_state
let initialize_key k =
  
{ k = k; n = 0 }