proposition: Lemma Rabs_div_pos : forall x y, y > 0 -> Rabs ( x / y ) = Rabs x / y.
proof: Proof. intros x y H. assert (H0 : (y <> 0)). intros H1. rewrite H1 in H. lra. rewrite (Rabs_div x y H0). rewrite (Rabs_right1 y H). reflexivity. Qed.
imports: ZArith Reals Lia Lra DiscrR Rfunctions