Theorem: Pos.mul_lt_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_lt_mul_of_pos_right h
State after:
x y : Pos
h : y.toNat > x.toNat
z : Pos
⊢ z.toNat > 0

State before:
x y : Pos
h : y.toNat > x.toNat
z : Pos
⊢ z.toNat > 0
Tactic:
exact Nat.zero_lt _
State after:
no goals