∀ {A : Type u_1} {K : Type u_2} [inst : CommRing A] [inst_1 : Field K] [inst_2 : Algebra A K]
  [inst_3 : IsFractionRing A K] [inst_4 : IsDedekindDomain A] (q : ℚ≥0) (a : FractionalIdeal (nonZeroDivisors A) K),
  ↑q * a = ↑q * a