(*********************************************************)
(*      Distributivity                                   *)
(*********************************************************)
Axiom
Fmult_Fplus_distr : forall r1 r2 r3 : F, r1 * (r2 + r3) = r1 * r2 + r1 * r3.
Hint Resolve Fmult_Fplus_distr: field_hints.

(*********************************************************)
(*      Instanciation of the new ring tactic             *)
(*********************************************************)
Lemma FRth : ring_theory 0 1 Fplus Fmult Fminus Fopp (@eq F).