∀ {X : Type u_1} [inst : PseudoMetricSpace X] {m0 : MeasurableSpace X} {μ : MeasureTheory.Measure X}
  {v v_1 : VitaliFamily μ} (e_v : v = v_1) {f f_1 : X → Set (Set X)} (e_f : f = f_1) {s s_1 : Set X} (e_s : s = s_1)
  (_h : v.FineSubfamilyOn f s) (a a_1 : X × Set X),
  a = a_1 → ∀ (a_2 a_3 : X), a_2 = a_3 → _h.covering a a_2 = ⋯.covering a_1 a_3