fact: Parameter one_step_subterm_subst : forall R s t sigma, refl_trans_clos (union _ (one_step R) (direct_subterm)) s t -> refl_trans_clos (union _ (one_step R) (direct_subterm)) (apply_subst sigma s) (apply_subst sigma t).
imports: Coq(List Relations Wellfounded Arith Setoid) CoLoR(closure more_list weaved_relation dickson term_spec)