fact: Definition format_list' : FormatM (store := cache) (list A) T := LeastFixedPoint (fDom := [list A; CacheFormat]) (fun format_list' xs => match xs with | nil => fun env => ret (mempty, env) | x :: xs' => format_A x ThenC format_list' xs' end).
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.ZArith.ZArith Fiat.Narcissus.Common.Notations Fiat.Narcissus.Common.Specs Fiat.Narcissus.Common.ComposeOpt Fiat.Narcissus.BaseFormats Fiat.Narcissus.Formats.Base.FixFormat Coq.Lists.List