fact: Definition hlist_tl {a b} (hl : hlist (a :: b)) : hlist b := match hl in hlist x return match x return Type@{hlist_large} with | nil => unit | _ :: ls => hlist ls end with | Hnil => tt | Hcons _ _ _ x => x 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