∀ (a b : ℚ),
  (a.num * ↑(b.den / a.den.gcd b.den) - b.num * ↑(a.den / a.den.gcd b.den)).natAbs.gcd (a.den.gcd b.den) =
    (a.num * ↑(b.den / a.den.gcd b.den) - b.num * ↑(a.den / a.den.gcd b.den)).natAbs.gcd
      (a.den / a.den.gcd b.den * b.den)