intro f g hf hg hassoc
⊢ ∀ {f g : Multiset (ℤ√(-3))},
    (∀ x ∈ f, OddPrimeOrFour x.norm.natAbs) →
      (∀ x ∈ g, OddPrimeOrFour x.norm.natAbs) →
        Associated f.prod.norm g.prod.norm →
          Multiset.map (Int.natAbs ∘ Zsqrtd.norm) f = Multiset.map (Int.natAbs ∘ Zsqrtd.norm) g
f g : Multiset (ℤ√(-3))
hf : ∀ x ∈ f, OddPrimeOrFour x.norm.natAbs
hg : ∀ x ∈ g, OddPrimeOrFour x.norm.natAbs
hassoc : Associated f.prod.norm g.prod.norm
⊢ Multiset.map (Int.natAbs ∘ Zsqrtd.norm) f = Multiset.map (Int.natAbs ∘ Zsqrtd.norm) g