fact: Definition syntactify_list {T : SimpleTypeCode} (ls : list (Term var T)) : Term var (clist T) := list_rect (fun _ => Term _ _) (RLiteralApp Rnil noargs) (fun x _ xs => RLiteralApp Rcons (x :: xs :: noargs)) ls.
imports: Coq.Strings.String Coq.Strings.Ascii Fiat.Parsers.Reflective.Syntax