fact: Definition var_in_term (v : variable) (t : term) : bool := match t with | Var x => (eq_var_bool x v) | Term _ l => var_in_term_list v l end.
imports: Coq(Recdef List Arith Setoid) CoLoR(closure more_list list_permut list_set decidable_set term_spec) CoLoR.Util.Nat(NatCompat)