fact: Hypotheses (Hvar : forall x, Pt (Var x)) (Hfun : forall f ts, Ps ts -> Pt (Fun f ts)) (Hnil : Ps Vnil) (Hcns : forall t n (ts : terms n), Pt t -> Ps ts -> Ps (Vcons t ts)).
imports: CoLoR(ListUtil LogicUtil EqUtil BoolUtil NatUtil VecUtil VecMax ListMax)