Theorem: Pos.mul_le_mul_right (Extra/Pos/Lemmas.lean)

State before:
x y : Pos
⊢ x ≤ y → ∀ (z : Pos), x * z ≤ y * z
Tactic:
by_toNat
State after:
x y : Pos
⊢ y.toNat ≥ x.toNat → ∀ (z : Pos), y.toNat * z.toNat ≥ x.toNat * z.toNat

State before:
x y : Pos
⊢ y.toNat ≥ x.toNat → ∀ (z : Pos), y.toNat * z.toNat ≥ x.toNat * z.toNat
Tactic:
intro h z
State after:
x y : Pos
h : y.toNat ≥ x.toNat
z : Pos
⊢ y.toNat * z.toNat ≥ x.toNat * z.toNat

State before:
x y : Pos
h : y.toNat ≥ x.toNat
z : Pos
⊢ y.toNat * z.toNat ≥ x.toNat * z.toNat
Tactic:
apply Nat.mul_le_mul_right _ h
State after:
no goals