proposition: Lemma AlignedDecode_Throw {A} : DecodeMEquivAlignedDecodeM (fun (_ : ByteString) (_ : CacheDecode) => None) (fun sz : nat => ThrowAlignedDecodeM (A := A)).
proof: Proof. unfold DecodeMEquivAlignedDecodeM; intuition; try discriminate. Qed.
imports: Fiat.Common.Coq__8_4__8_5__Compat Bedrock.Word Coq.ZArith.ZArith Coq.NArith.NArith Coq.Arith.Arith Coq.Numbers.Natural.Peano.NPeano Coq.Logic.Eqdep_dec Fiat.Narcissus.Common.Specs Fiat.Narcissus.BinLib.Core Fiat.Narcissus.BinLib.AlignedByteString