English
Disjoint I (hC.disjointOfDiffUnion hs hI).
Русский
Равенство Disjoint I (hC.disjointOfDiffUnion hs hI).
LaTeX
$$$$ Disjoint I (hC.disjointOfDiffUnion hs hI) $$$$
Lean4
theorem disjoint_disjointOfDiffUnion (hC : IsSetSemiring C) (hs : s ∈ C) (hI : ↑I ⊆ C) :
Disjoint I (hC.disjointOfDiffUnion hs hI) := by
by_contra h
rw [Finset.not_disjoint_iff] at h
obtain ⟨u, huI, hu_disjointOfDiffUnion⟩ := h
have h_disj : u ≤ ⊥ :=
hC.disjoint_sUnion_disjointOfDiffUnion hs hI (subset_sUnion_of_mem huI)
(subset_sUnion_of_mem hu_disjointOfDiffUnion)
simp only [Set.bot_eq_empty, Set.le_eq_subset, subset_empty_iff] at h_disj
refine hC.empty_notMem_disjointOfDiffUnion hs hI ?_
rwa [h_disj] at hu_disjointOfDiffUnion