fact: Definition decode_unused_word : DecodeM (unit * T) T := Compose_Decode decode_word (fun wt => (tt, snd wt)).
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.ZArith.ZArith Fiat.Common Fiat.Computation.Notations Fiat.Narcissus.Common.Specs Fiat.Narcissus.Common.WordFacts Fiat.Narcissus.BaseFormats