fact: Definition Interp_dom t := forall p f l, subterm_at_pos t p = Some (Term f l) -> G f -> Acc (one_step R) (Term f l).
imports: Coq(List Relations Wellfounded Arith Recdef Setoid) CoLoR(closure more_list weaved_relation term_spec equational_theory_spec dp graph_dp terminaison interp)