proposition: Lemma red_fun_rho: red_fun R rho.
proof: Proof. Proof using H1 H2 S tf refl. split. - intros x. eapply H2, tf, refl. - eapply rho_evaluates. Qed.
imports: Morphisms FinFun ConstructiveEpsilon Undecidability.HOU(std.tactics std.decidable std.misc std.ars.basic std.ars.confluence)