proposition: Lemma multNonnegativeReals_lecompat : ∏ x y z t : NonnegativeReals, x <= y -> z <= t -> x * z <= y * t.
proof: Proof. intros x y z t H H0. eapply istrans_leNonnegativeReals, multNonnegativeReals_lecompat_l', H. apply multNonnegativeReals_lecompat_r', H0. Qed.
imports: UniMath.Algebra.Groups UniMath.Foundations.Preamble UniMath.MoreFoundations.Orders UniMath.MoreFoundations.Tactics UniMath.OrderTheory.Lattice.Lattice UniMath.RealNumbers.Prelim UniMath.RealNumbers.Sets UniMath.RealNumbers.NonnegativeRationals UniMath.RealNumbers.NonnegativeReals