obtain ⟨m, ha, hb⟩ := Nat.proportional_of_mul_eq_mul_of_coprime h hc
d : ℕ
inst✝ : NeZero d
a b a' b' : ℕ
hab : a ≠ 0 ∨ b ≠ 0
hc : Nat.Coprime a' b'
h : a' * b = b' * a
⊢ of_fraction d a' b' ≤ of_fraction d a b
case intro.intro
d : ℕ
inst✝ : NeZero d
a b a' b' : ℕ
hab : a ≠ 0 ∨ b ≠ 0
hc : Nat.Coprime a' b'
h : a' * b = b' * a
m : ℕ
ha : a = m * a'
hb : b = m * b'
⊢ of_fraction d a' b' ≤ of_fraction d a b