Metamath Proof Explorer


Theorem fgcl

Description: A generated filter is a filter. (Contributed by Jeff Hankins, 3-Sep-2009) (Revised by Stefan O'Rear, 2-Aug-2015)

Ref Expression
Assertion fgcl ⊢ F ∈ fBas ⁡ X → X filGen F ∈ Fil ⁡ X

Proof

Step Hyp Ref Expression
1 elfg ⊢ F ∈ fBas ⁡ X → z ∈ X filGen F ↔ z ⊆ X ∧ ∃ y ∈ F y ⊆ z
2 elfvex ⊢ F ∈ fBas ⁡ X → X ∈ V
3 fbasne0 ⊢ F ∈ fBas ⁡ X → F ≠ ∅
4 n0 ⊢ F ≠ ∅ ↔ ∃ y y ∈ F
5 3 4 sylib ⊢ F ∈ fBas ⁡ X → ∃ y y ∈ F
6 fbelss ⊢ F ∈ fBas ⁡ X ∧ y ∈ F → y ⊆ X
7 6 ex ⊢ F ∈ fBas ⁡ X → y ∈ F → y ⊆ X
8 7 ancld ⊢ F ∈ fBas ⁡ X → y ∈ F → y ∈ F ∧ y ⊆ X
9 8 eximdv ⊢ F ∈ fBas ⁡ X → ∃ y y ∈ F → ∃ y y ∈ F ∧ y ⊆ X
10 5 9 mpd ⊢ F ∈ fBas ⁡ X → ∃ y y ∈ F ∧ y ⊆ X
11 df-rex ⊢ ∃ y ∈ F y ⊆ X ↔ ∃ y y ∈ F ∧ y ⊆ X
12 10 11 sylibr ⊢ F ∈ fBas ⁡ X → ∃ y ∈ F y ⊆ X
13 elfvdm ⊢ F ∈ fBas ⁡ X → X ∈ dom ⁡ fBas
14 sseq2 ⊢ z = X → y ⊆ z ↔ y ⊆ X
15 14 rexbidv ⊢ z = X → ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ X
16 15 sbcieg ⊢ X ∈ dom ⁡ fBas → [˙X / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ X
17 13 16 syl ⊢ F ∈ fBas ⁡ X → [˙X / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ X
18 12 17 mpbird ⊢ F ∈ fBas ⁡ X → [˙X / z]˙ ∃ y ∈ F y ⊆ z
19 0nelfb ⊢ F ∈ fBas ⁡ X → ¬ ∅ ∈ F
20 0ex ⊢ ∅ ∈ V
21 sseq2 ⊢ z = ∅ → y ⊆ z ↔ y ⊆ ∅
22 21 rexbidv ⊢ z = ∅ → ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ ∅
23 20 22 sbcie ⊢ [˙∅ / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ ∅
24 ss0 ⊢ y ⊆ ∅ → y = ∅
25 24 eleq1d ⊢ y ⊆ ∅ → y ∈ F ↔ ∅ ∈ F
26 25 biimpac ⊢ y ∈ F ∧ y ⊆ ∅ → ∅ ∈ F
27 26 rexlimiva ⊢ ∃ y ∈ F y ⊆ ∅ → ∅ ∈ F
28 23 27 sylbi ⊢ [˙∅ / z]˙ ∃ y ∈ F y ⊆ z → ∅ ∈ F
29 19 28 nsyl ⊢ F ∈ fBas ⁡ X → ¬ [˙∅ / z]˙ ∃ y ∈ F y ⊆ z
30 sstr ⊢ y ⊆ v ∧ v ⊆ u → y ⊆ u
31 30 expcom ⊢ v ⊆ u → y ⊆ v → y ⊆ u
32 31 reximdv ⊢ v ⊆ u → ∃ y ∈ F y ⊆ v → ∃ y ∈ F y ⊆ u
33 32 3ad2ant3 ⊢ F ∈ fBas ⁡ X ∧ u ⊆ X ∧ v ⊆ u → ∃ y ∈ F y ⊆ v → ∃ y ∈ F y ⊆ u
34 vex ⊢ v ∈ V
35 sseq2 ⊢ z = v → y ⊆ z ↔ y ⊆ v
36 35 rexbidv ⊢ z = v → ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ v
37 34 36 sbcie ⊢ [˙v / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ v
38 vex ⊢ u ∈ V
39 sseq2 ⊢ z = u → y ⊆ z ↔ y ⊆ u
40 39 rexbidv ⊢ z = u → ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ u
41 38 40 sbcie ⊢ [˙u / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ u
42 33 37 41 3imtr4g ⊢ F ∈ fBas ⁡ X ∧ u ⊆ X ∧ v ⊆ u → [˙v / z]˙ ∃ y ∈ F y ⊆ z → [˙u / z]˙ ∃ y ∈ F y ⊆ z
43 fbasssin ⊢ F ∈ fBas ⁡ X ∧ z ∈ F ∧ w ∈ F → ∃ y ∈ F y ⊆ z ∩ w
44 43 3expib ⊢ F ∈ fBas ⁡ X → z ∈ F ∧ w ∈ F → ∃ y ∈ F y ⊆ z ∩ w
45 sstr2 ⊢ y ⊆ z ∩ w → z ∩ w ⊆ u ∩ v → y ⊆ u ∩ v
46 45 com12 ⊢ z ∩ w ⊆ u ∩ v → y ⊆ z ∩ w → y ⊆ u ∩ v
47 46 reximdv ⊢ z ∩ w ⊆ u ∩ v → ∃ y ∈ F y ⊆ z ∩ w → ∃ y ∈ F y ⊆ u ∩ v
48 ss2in ⊢ z ⊆ u ∧ w ⊆ v → z ∩ w ⊆ u ∩ v
49 47 48 syl11 ⊢ ∃ y ∈ F y ⊆ z ∩ w → z ⊆ u ∧ w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
50 44 49 syl6 ⊢ F ∈ fBas ⁡ X → z ∈ F ∧ w ∈ F → z ⊆ u ∧ w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
51 50 exp5c ⊢ F ∈ fBas ⁡ X → z ∈ F → w ∈ F → z ⊆ u → w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
52 51 imp31 ⊢ F ∈ fBas ⁡ X ∧ z ∈ F ∧ w ∈ F → z ⊆ u → w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
53 52 impancom ⊢ F ∈ fBas ⁡ X ∧ z ∈ F ∧ z ⊆ u → w ∈ F → w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
54 53 rexlimdv ⊢ F ∈ fBas ⁡ X ∧ z ∈ F ∧ z ⊆ u → ∃ w ∈ F w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
55 54 rexlimdva2 ⊢ F ∈ fBas ⁡ X → ∃ z ∈ F z ⊆ u → ∃ w ∈ F w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
56 55 impd ⊢ F ∈ fBas ⁡ X → ∃ z ∈ F z ⊆ u ∧ ∃ w ∈ F w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
57 56 3ad2ant1 ⊢ F ∈ fBas ⁡ X ∧ u ⊆ X ∧ v ⊆ X → ∃ z ∈ F z ⊆ u ∧ ∃ w ∈ F w ⊆ v → ∃ y ∈ F y ⊆ u ∩ v
58 sseq1 ⊢ y = z → y ⊆ u ↔ z ⊆ u
59 58 cbvrexvw ⊢ ∃ y ∈ F y ⊆ u ↔ ∃ z ∈ F z ⊆ u
60 41 59 bitri ⊢ [˙u / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ z ∈ F z ⊆ u
61 sseq1 ⊢ y = w → y ⊆ v ↔ w ⊆ v
62 61 cbvrexvw ⊢ ∃ y ∈ F y ⊆ v ↔ ∃ w ∈ F w ⊆ v
63 37 62 bitri ⊢ [˙v / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ w ∈ F w ⊆ v
64 60 63 anbi12i ⊢ [˙u / z]˙ ∃ y ∈ F y ⊆ z ∧ [˙v / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ z ∈ F z ⊆ u ∧ ∃ w ∈ F w ⊆ v
65 38 inex1 ⊢ u ∩ v ∈ V
66 sseq2 ⊢ z = u ∩ v → y ⊆ z ↔ y ⊆ u ∩ v
67 66 rexbidv ⊢ z = u ∩ v → ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ u ∩ v
68 65 67 sbcie ⊢ [˙ u ∩ v / z]˙ ∃ y ∈ F y ⊆ z ↔ ∃ y ∈ F y ⊆ u ∩ v
69 57 64 68 3imtr4g ⊢ F ∈ fBas ⁡ X ∧ u ⊆ X ∧ v ⊆ X → [˙u / z]˙ ∃ y ∈ F y ⊆ z ∧ [˙v / z]˙ ∃ y ∈ F y ⊆ z → [˙ u ∩ v / z]˙ ∃ y ∈ F y ⊆ z
70 1 2 18 29 42 69 isfild ⊢ F ∈ fBas ⁡ X → X filGen F ∈ Fil ⁡ X