∀ (pw₁ : Lean.Grind.CommRing.Power) (m₁ : Lean.Grind.CommRing.Mon) (pw₂ : Lean.Grind.CommRing.Power)
  (m₂ : Lean.Grind.CommRing.Mon),
  (invImage (fun x => PSigma.casesOn x fun a a_1 => (a, a_1)) Prod.instWellFoundedRelation).1
    ⟨Lean.Grind.CommRing.Mon.mult pw₁ m₁, m₂⟩ ⟨Lean.Grind.CommRing.Mon.mult pw₁ m₁, Lean.Grind.CommRing.Mon.mult pw₂ m₂⟩