fact: Parameter are_constructors_of_R : forall R, (forall v t, ~ R t (Var v)) -> forall f l t', (refl_trans_clos (one_step R) t' (Term f l)) -> (~defined R f) -> exists l', t' = Term f l' /\ refl_trans_clos (one_step_list (one_step R)) l' l.
imports: Coq(List Relations Wellfounded Arith Setoid) CoLoR(closure more_list weaved_relation dickson term_spec)