Metamath Proof Explorer


Theorem fnemeet2

Description: The meet of equivalence classes under the fineness relation-part two. (Contributed by Jeff Hankins, 6-Oct-2009) (Proof shortened by Mario Carneiro, 12-Sep-2015)

Ref Expression
Assertion fnemeet2 ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ↔ X = ⋃ T ∧ ∀ x ∈ S T Fne x

Proof

Step Hyp Ref Expression
1 riin0 ⊢ S = ∅ → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t = 𝒫 X
2 1 unieqd ⊢ S = ∅ → ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t = ⋃ 𝒫 X
3 unipw ⊢ ⋃ 𝒫 X = X
4 2 3 eqtr2di ⊢ S = ∅ → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
5 4 a1i ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → S = ∅ → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
6 n0 ⊢ S ≠ ∅ ↔ ∃ x x ∈ S
7 unieq ⊢ y = x → ⋃ y = ⋃ x
8 7 eqeq2d ⊢ y = x → X = ⋃ y ↔ X = ⋃ x
9 8 rspccva ⊢ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → X = ⋃ x
10 9 3adant1 ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → X = ⋃ x
11 fnemeet1 ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t Fne x
12 eqid ⊢ ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
13 eqid ⊢ ⋃ x = ⋃ x
14 12 13 fnebas ⊢ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t Fne x → ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t = ⋃ x
15 11 14 syl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t = ⋃ x
16 10 15 eqtr4d ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
17 16 3expia ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → x ∈ S → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
18 17 exlimdv ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → ∃ x x ∈ S → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
19 6 18 biimtrid ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → S ≠ ∅ → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
20 5 19 pm2.61dne ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
21 20 adantr ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
22 eqid ⊢ ⋃ T = ⋃ T
23 22 12 fnebas ⊢ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → ⋃ T = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
24 23 adantl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → ⋃ T = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
25 21 24 eqtr4d ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → X = ⋃ T
26 25 ex ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → X = ⋃ T
27 fnetr ⊢ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∧ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t Fne x → T Fne x
28 27 expcom ⊢ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t Fne x → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → T Fne x
29 11 28 syl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → T Fne x
30 29 3expa ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ x ∈ S → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → T Fne x
31 30 ralrimdva ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → ∀ x ∈ S T Fne x
32 26 31 jcad ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t → X = ⋃ T ∧ ∀ x ∈ S T Fne x
33 simprl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → X = ⋃ T
34 20 adantr ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → X = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
35 33 34 eqtr3d ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → ⋃ T = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
36 eqimss2 ⊢ X = ⋃ T → ⋃ T ⊆ X
37 36 ad2antrl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → ⋃ T ⊆ X
38 sspwuni ⊢ T ⊆ 𝒫 X ↔ ⋃ T ⊆ X
39 37 38 sylibr ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → T ⊆ 𝒫 X
40 breq2 ⊢ x = t → T Fne x ↔ T Fne t
41 40 cbvralvw ⊢ ∀ x ∈ S T Fne x ↔ ∀ t ∈ S T Fne t
42 fnetg ⊢ T Fne t → T ⊆ topGen ⁡ t
43 42 ralimi ⊢ ∀ t ∈ S T Fne t → ∀ t ∈ S T ⊆ topGen ⁡ t
44 41 43 sylbi ⊢ ∀ x ∈ S T Fne x → ∀ t ∈ S T ⊆ topGen ⁡ t
45 44 ad2antll ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → ∀ t ∈ S T ⊆ topGen ⁡ t
46 ssiin ⊢ T ⊆ ⋂ t ∈ S topGen ⁡ t ↔ ∀ t ∈ S T ⊆ topGen ⁡ t
47 45 46 sylibr ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → T ⊆ ⋂ t ∈ S topGen ⁡ t
48 39 47 ssind ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → T ⊆ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
49 pwexg ⊢ X ∈ V → 𝒫 X ∈ V
50 inex1g ⊢ 𝒫 X ∈ V → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∈ V
51 49 50 syl ⊢ X ∈ V → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∈ V
52 51 ad2antrr ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∈ V
53 bastg ⊢ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∈ V → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ⊆ topGen ⁡ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
54 52 53 syl ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ⊆ topGen ⁡ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
55 48 54 sstrd ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → T ⊆ topGen ⁡ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
56 22 12 isfne4 ⊢ T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ↔ ⋃ T = ⋃ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ∧ T ⊆ topGen ⁡ 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
57 35 55 56 sylanbrc ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y ∧ X = ⋃ T ∧ ∀ x ∈ S T Fne x → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
58 57 ex ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → X = ⋃ T ∧ ∀ x ∈ S T Fne x → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t
59 32 58 impbid ⊢ X ∈ V ∧ ∀ y ∈ S X = ⋃ y → T Fne 𝒫 X ∩ ⋂ t ∈ S topGen ⁡ t ↔ X = ⋃ T ∧ ∀ x ∈ S T Fne x