pos_split3@{} : forall e : Q+, e = e / 3 + e / 3 + e / 3. Proof. intros. path_via (e * (3 / 3)). - rewrite pos_recip_r,pos_mult_1_r;reflexivity. - apply pos_eq. change (' e * (3 / 3) = ' e / 3 + ' e / 3 + ' e / 3). ring_tac.ring_with_nat. Qed.
Require Import Import Quoting.Instances. Import NatPair.Instances.