fact: Fixpoint hlist_map (ls : list A) (hl : hlist F ls) {struct hl} : hlist G ls := match hl in @hlist _ _ ls return hlist G ls with | Hnil => Hnil | Hcons _ _ hd tl => Hcons (ff hd) (hlist_map tl) end.
imports: Coq.Lists.List Coq.Arith.PeanoNat Relations RelationClasses ExtLib.Core.RelDec ExtLib.Data.SigT ExtLib.Data.Member ExtLib.Data.ListNth ExtLib.Data.Option ExtLib.Tactics Coq.Classes.Morphisms