∀ {G : Type u_1} [inst : Group G] [inst_1 : TopologicalSpace G] [inst_2 : IsTopologicalGroup G]
  {K₀ : TopologicalSpace.PositiveCompacts G} {U : Set G},
  (interior U).Nonempty →
    ∀ (g : G) (K : TopologicalSpace.Compacts G),
      MeasureTheory.Measure.haar.prehaar (↑K₀) U (TopologicalSpace.Compacts.map (fun b => g * b) ⋯ K) =
        MeasureTheory.Measure.haar.prehaar (↑K₀) U K