proposition: Fact red_fun_fp x : Normal R x -> rho x = x.
proof: Proof. Proof using red. intros H. symmetry. eapply Normal_star_stops; eauto. apply red. Qed.
imports: Morphisms FinFun ConstructiveEpsilon Undecidability.HOU(std.tactics std.decidable std.misc std.ars.basic std.ars.confluence)