fact: Definition DecodeOpt2_fmap {S S'} (f : S -> S') (a_opt : option S) : option S' := Ifopt a_opt as a Then Some (f a) Else None.
imports: Coq.Lists.List Fiat.Common Fiat.Computation.Core Fiat.Computation.Notations Fiat.Narcissus.Common.Notations Fiat.Narcissus.Common.Monoid Fiat.Narcissus.Stores.Cache