(K : Type u_1) →
  [inst : Field K] →
    [inst_1 : CharZero K] →
      [NumberField.IsCMField K] →
        [Algebra.IsIntegral ℚ K] → (NumberField.RingOfIntegers K)ˣ ≃* (NumberField.RingOfIntegers K)ˣ