fact: Definition BindResetAlignedDecodeM {A B : Type} {n : nat} (a : AlignedDecodeM A n) (b : A -> AlignedDecodeM B n) : AlignedDecodeM B n := fun v idx c => (Ifopt a v idx c as a' Then (b (fst (fst a')) v idx (snd a')) Else None).
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