Metamath Proof Explorer


Theorem trfil2

Description: Conditions for the trace of a filter L to be a filter. (Contributed by FL, 2-Sep-2013) (Revised by Stefan O'Rear, 2-Aug-2015)

Ref Expression
Assertion trfil2 ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → L ↾ 𝑡 A ∈ Fil ⁡ A ↔ ∀ v ∈ L v ∩ A ≠ ∅

Proof

Step Hyp Ref Expression
1 simpr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → A ⊆ Y
2 sseqin2 ⊢ A ⊆ Y ↔ Y ∩ A = A
3 1 2 sylib ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → Y ∩ A = A
4 simpl ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → L ∈ Fil ⁡ Y
5 id ⊢ A ⊆ Y → A ⊆ Y
6 filtop ⊢ L ∈ Fil ⁡ Y → Y ∈ L
7 ssexg ⊢ A ⊆ Y ∧ Y ∈ L → A ∈ V
8 5 6 7 syl2anr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → A ∈ V
9 6 adantr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → Y ∈ L
10 elrestr ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V ∧ Y ∈ L → Y ∩ A ∈ L ↾ 𝑡 A
11 4 8 9 10 syl3anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → Y ∩ A ∈ L ↾ 𝑡 A
12 3 11 eqeltrrd ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → A ∈ L ↾ 𝑡 A
13 elpwi ⊢ x ∈ 𝒫 A → x ⊆ A
14 vex ⊢ u ∈ V
15 14 inex1 ⊢ u ∩ A ∈ V
16 15 a1i ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L → u ∩ A ∈ V
17 elrest ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V → y ∈ L ↾ 𝑡 A ↔ ∃ u ∈ L y = u ∩ A
18 8 17 syldan ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → y ∈ L ↾ 𝑡 A ↔ ∃ u ∈ L y = u ∩ A
19 18 adantr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A → y ∈ L ↾ 𝑡 A ↔ ∃ u ∈ L y = u ∩ A
20 simpr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ y = u ∩ A → y = u ∩ A
21 20 sseq1d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ y = u ∩ A → y ⊆ x ↔ u ∩ A ⊆ x
22 16 19 21 rexxfr2d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A → ∃ y ∈ L ↾ 𝑡 A y ⊆ x ↔ ∃ u ∈ L u ∩ A ⊆ x
23 indir ⊢ u ∪ x ∩ A = u ∩ A ∪ x ∩ A
24 simplr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → x ⊆ A
25 dfss2 ⊢ x ⊆ A ↔ x ∩ A = x
26 24 25 sylib ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → x ∩ A = x
27 26 uneq2d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∩ A ∪ x ∩ A = u ∩ A ∪ x
28 simprr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∩ A ⊆ x
29 ssequn1 ⊢ u ∩ A ⊆ x ↔ u ∩ A ∪ x = x
30 28 29 sylib ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∩ A ∪ x = x
31 27 30 eqtrd ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∩ A ∪ x ∩ A = x
32 23 31 eqtrid ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∪ x ∩ A = x
33 simplll ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → L ∈ Fil ⁡ Y
34 simpllr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → A ⊆ Y
35 33 34 8 syl2anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → A ∈ V
36 simprl ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∈ L
37 filelss ⊢ L ∈ Fil ⁡ Y ∧ u ∈ L → u ⊆ Y
38 33 36 37 syl2anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ⊆ Y
39 24 34 sstrd ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → x ⊆ Y
40 38 39 unssd ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∪ x ⊆ Y
41 ssun1 ⊢ u ⊆ u ∪ x
42 41 a1i ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ⊆ u ∪ x
43 filss ⊢ L ∈ Fil ⁡ Y ∧ u ∈ L ∧ u ∪ x ⊆ Y ∧ u ⊆ u ∪ x → u ∪ x ∈ L
44 33 36 40 42 43 syl13anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∪ x ∈ L
45 elrestr ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V ∧ u ∪ x ∈ L → u ∪ x ∩ A ∈ L ↾ 𝑡 A
46 33 35 44 45 syl3anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → u ∪ x ∩ A ∈ L ↾ 𝑡 A
47 32 46 eqeltrrd ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A ∧ u ∈ L ∧ u ∩ A ⊆ x → x ∈ L ↾ 𝑡 A
48 47 rexlimdvaa ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A → ∃ u ∈ L u ∩ A ⊆ x → x ∈ L ↾ 𝑡 A
49 22 48 sylbid ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x ⊆ A → ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A
50 49 ex ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → x ⊆ A → ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A
51 13 50 syl5 ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → x ∈ 𝒫 A → ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A
52 51 ralrimiv ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A
53 simpll ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ z ∈ L ∧ u ∈ L → L ∈ Fil ⁡ Y
54 8 adantr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ z ∈ L ∧ u ∈ L → A ∈ V
55 filin ⊢ L ∈ Fil ⁡ Y ∧ z ∈ L ∧ u ∈ L → z ∩ u ∈ L
56 55 3expb ⊢ L ∈ Fil ⁡ Y ∧ z ∈ L ∧ u ∈ L → z ∩ u ∈ L
57 56 adantlr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ z ∈ L ∧ u ∈ L → z ∩ u ∈ L
58 elrestr ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V ∧ z ∩ u ∈ L → z ∩ u ∩ A ∈ L ↾ 𝑡 A
59 53 54 57 58 syl3anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ z ∈ L ∧ u ∈ L → z ∩ u ∩ A ∈ L ↾ 𝑡 A
60 59 ralrimivva ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ z ∈ L ∀ u ∈ L z ∩ u ∩ A ∈ L ↾ 𝑡 A
61 vex ⊢ z ∈ V
62 61 inex1 ⊢ z ∩ A ∈ V
63 62 a1i ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ z ∈ L → z ∩ A ∈ V
64 elrest ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V → x ∈ L ↾ 𝑡 A ↔ ∃ z ∈ L x = z ∩ A
65 8 64 syldan ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → x ∈ L ↾ 𝑡 A ↔ ∃ z ∈ L x = z ∩ A
66 15 a1i ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x = z ∩ A ∧ u ∈ L → u ∩ A ∈ V
67 18 adantr ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x = z ∩ A → y ∈ L ↾ 𝑡 A ↔ ∃ u ∈ L y = u ∩ A
68 ineq12 ⊢ x = z ∩ A ∧ y = u ∩ A → x ∩ y = z ∩ A ∩ u ∩ A
69 inindir ⊢ z ∩ u ∩ A = z ∩ A ∩ u ∩ A
70 68 69 eqtr4di ⊢ x = z ∩ A ∧ y = u ∩ A → x ∩ y = z ∩ u ∩ A
71 70 adantll ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x = z ∩ A ∧ y = u ∩ A → x ∩ y = z ∩ u ∩ A
72 71 eleq1d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x = z ∩ A ∧ y = u ∩ A → x ∩ y ∈ L ↾ 𝑡 A ↔ z ∩ u ∩ A ∈ L ↾ 𝑡 A
73 66 67 72 ralxfr2d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y ∧ x = z ∩ A → ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ ∀ u ∈ L z ∩ u ∩ A ∈ L ↾ 𝑡 A
74 63 65 73 ralxfr2d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ ∀ z ∈ L ∀ u ∈ L z ∩ u ∩ A ∈ L ↾ 𝑡 A
75 60 74 mpbird ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
76 isfil2 ⊢ L ↾ 𝑡 A ∈ Fil ⁡ A ↔ L ↾ 𝑡 A ⊆ 𝒫 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
77 restsspw ⊢ L ↾ 𝑡 A ⊆ 𝒫 A
78 3anass ⊢ L ↾ 𝑡 A ⊆ 𝒫 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ↔ L ↾ 𝑡 A ⊆ 𝒫 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A
79 77 78 mpbiran ⊢ L ↾ 𝑡 A ⊆ 𝒫 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ↔ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A
80 79 3anbi1i ⊢ L ↾ 𝑡 A ⊆ 𝒫 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
81 3anass ⊢ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
82 76 80 81 3bitri ⊢ L ↾ 𝑡 A ∈ Fil ⁡ A ↔ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
83 anass ⊢ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A
84 ancom ⊢ ¬ ∅ ∈ L ↾ 𝑡 A ∧ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ↔ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A
85 82 83 84 3bitri ⊢ L ↾ 𝑡 A ∈ Fil ⁡ A ↔ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A ∧ ¬ ∅ ∈ L ↾ 𝑡 A
86 85 baib ⊢ A ∈ L ↾ 𝑡 A ∧ ∀ x ∈ 𝒫 A ∃ y ∈ L ↾ 𝑡 A y ⊆ x → x ∈ L ↾ 𝑡 A ∧ ∀ x ∈ L ↾ 𝑡 A ∀ y ∈ L ↾ 𝑡 A x ∩ y ∈ L ↾ 𝑡 A → L ↾ 𝑡 A ∈ Fil ⁡ A ↔ ¬ ∅ ∈ L ↾ 𝑡 A
87 12 52 75 86 syl12anc ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → L ↾ 𝑡 A ∈ Fil ⁡ A ↔ ¬ ∅ ∈ L ↾ 𝑡 A
88 nesym ⊢ v ∩ A ≠ ∅ ↔ ¬ ∅ = v ∩ A
89 88 ralbii ⊢ ∀ v ∈ L v ∩ A ≠ ∅ ↔ ∀ v ∈ L ¬ ∅ = v ∩ A
90 elrest ⊢ L ∈ Fil ⁡ Y ∧ A ∈ V → ∅ ∈ L ↾ 𝑡 A ↔ ∃ v ∈ L ∅ = v ∩ A
91 8 90 syldan ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∅ ∈ L ↾ 𝑡 A ↔ ∃ v ∈ L ∅ = v ∩ A
92 dfrex2 ⊢ ∃ v ∈ L ∅ = v ∩ A ↔ ¬ ∀ v ∈ L ¬ ∅ = v ∩ A
93 91 92 bitrdi ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∅ ∈ L ↾ 𝑡 A ↔ ¬ ∀ v ∈ L ¬ ∅ = v ∩ A
94 93 con2bid ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ v ∈ L ¬ ∅ = v ∩ A ↔ ¬ ∅ ∈ L ↾ 𝑡 A
95 89 94 bitrid ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → ∀ v ∈ L v ∩ A ≠ ∅ ↔ ¬ ∅ ∈ L ↾ 𝑡 A
96 87 95 bitr4d ⊢ L ∈ Fil ⁡ Y ∧ A ⊆ Y → L ↾ 𝑡 A ∈ Fil ⁡ A ↔ ∀ v ∈ L v ∩ A ≠ ∅