Metamath Proof Explorer


Theorem trfbas2

Description: Conditions for the trace of a filter base F to be a filter base. (Contributed by Mario Carneiro, 13-Oct-2015)

Ref Expression
Assertion trfbas2 ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ¬ ∅ ∈ ( 𝐹t 𝐴 ) ) )

Proof

Step Hyp Ref Expression
1 elfvdm ( 𝐹 ∈ ( fBas ‘ 𝑌 ) → 𝑌 ∈ dom fBas )
2 ssexg ( ( 𝐴𝑌𝑌 ∈ dom fBas ) → 𝐴 ∈ V )
3 2 ancoms ( ( 𝑌 ∈ dom fBas ∧ 𝐴𝑌 ) → 𝐴 ∈ V )
4 1 3 sylan ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → 𝐴 ∈ V )
5 restsspw ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴
6 5 a1i ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴 )
7 fbasne0 ( 𝐹 ∈ ( fBas ‘ 𝑌 ) → 𝐹 ≠ ∅ )
8 7 adantr ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → 𝐹 ≠ ∅ )
9 n0 ( 𝐹 ≠ ∅ ↔ ∃ 𝑥 𝑥𝐹 )
10 8 9 sylib ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ∃ 𝑥 𝑥𝐹 )
11 elrestr ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴 ∈ V ∧ 𝑥𝐹 ) → ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) )
12 11 3expia ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴 ∈ V ) → ( 𝑥𝐹 → ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) ) )
13 4 12 syldan ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝑥𝐹 → ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) ) )
14 ne0i ( ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) → ( 𝐹t 𝐴 ) ≠ ∅ )
15 13 14 syl6 ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝑥𝐹 → ( 𝐹t 𝐴 ) ≠ ∅ ) )
16 15 exlimdv ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( ∃ 𝑥 𝑥𝐹 → ( 𝐹t 𝐴 ) ≠ ∅ ) )
17 10 16 mpd ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝐹t 𝐴 ) ≠ ∅ )
18 fbasssin ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝑧𝐹𝑤𝐹 ) → ∃ 𝑥𝐹 𝑥 ⊆ ( 𝑧𝑤 ) )
19 18 3expb ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) → ∃ 𝑥𝐹 𝑥 ⊆ ( 𝑧𝑤 ) )
20 19 adantlr ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) → ∃ 𝑥𝐹 𝑥 ⊆ ( 𝑧𝑤 ) )
21 simplll ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → 𝐹 ∈ ( fBas ‘ 𝑌 ) )
22 4 ad2antrr ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → 𝐴 ∈ V )
23 simprl ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → 𝑥𝐹 )
24 21 22 23 11 syl3anc ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) )
25 ssrin ( 𝑥 ⊆ ( 𝑧𝑤 ) → ( 𝑥𝐴 ) ⊆ ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
26 25 ad2antll ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → ( 𝑥𝐴 ) ⊆ ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
27 vex 𝑥 ∈ V
28 27 inex1 ( 𝑥𝐴 ) ∈ V
29 28 elpw ( ( 𝑥𝐴 ) ∈ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ↔ ( 𝑥𝐴 ) ⊆ ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
30 26 29 sylibr ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → ( 𝑥𝐴 ) ∈ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
31 inelcm ( ( ( 𝑥𝐴 ) ∈ ( 𝐹t 𝐴 ) ∧ ( 𝑥𝐴 ) ∈ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) → ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ )
32 24 30 31 syl2anc ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) ∧ ( 𝑥𝐹𝑥 ⊆ ( 𝑧𝑤 ) ) ) → ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ )
33 20 32 rexlimddv ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ ( 𝑧𝐹𝑤𝐹 ) ) → ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ )
34 33 ralrimivva ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ∀ 𝑧𝐹𝑤𝐹 ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ )
35 vex 𝑧 ∈ V
36 35 inex1 ( 𝑧𝐴 ) ∈ V
37 36 a1i ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ 𝑧𝐹 ) → ( 𝑧𝐴 ) ∈ V )
38 elrest ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴 ∈ V ) → ( 𝑥 ∈ ( 𝐹t 𝐴 ) ↔ ∃ 𝑧𝐹 𝑥 = ( 𝑧𝐴 ) ) )
39 4 38 syldan ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝑥 ∈ ( 𝐹t 𝐴 ) ↔ ∃ 𝑧𝐹 𝑥 = ( 𝑧𝐴 ) ) )
40 vex 𝑤 ∈ V
41 40 inex1 ( 𝑤𝐴 ) ∈ V
42 41 a1i ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ 𝑥 = ( 𝑧𝐴 ) ) ∧ 𝑤𝐹 ) → ( 𝑤𝐴 ) ∈ V )
43 elrest ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴 ∈ V ) → ( 𝑦 ∈ ( 𝐹t 𝐴 ) ↔ ∃ 𝑤𝐹 𝑦 = ( 𝑤𝐴 ) ) )
44 4 43 syldan ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( 𝑦 ∈ ( 𝐹t 𝐴 ) ↔ ∃ 𝑤𝐹 𝑦 = ( 𝑤𝐴 ) ) )
45 44 adantr ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ 𝑥 = ( 𝑧𝐴 ) ) → ( 𝑦 ∈ ( 𝐹t 𝐴 ) ↔ ∃ 𝑤𝐹 𝑦 = ( 𝑤𝐴 ) ) )
46 ineq12 ( ( 𝑥 = ( 𝑧𝐴 ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → ( 𝑥𝑦 ) = ( ( 𝑧𝐴 ) ∩ ( 𝑤𝐴 ) ) )
47 inindir ( ( 𝑧𝑤 ) ∩ 𝐴 ) = ( ( 𝑧𝐴 ) ∩ ( 𝑤𝐴 ) )
48 46 47 eqtr4di ( ( 𝑥 = ( 𝑧𝐴 ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → ( 𝑥𝑦 ) = ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
49 48 pweqd ( ( 𝑥 = ( 𝑧𝐴 ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → 𝒫 ( 𝑥𝑦 ) = 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) )
50 49 ineq2d ( ( 𝑥 = ( 𝑧𝐴 ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) = ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) )
51 50 neeq1d ( ( 𝑥 = ( 𝑧𝐴 ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → ( ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ↔ ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ ) )
52 51 adantll ( ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ 𝑥 = ( 𝑧𝐴 ) ) ∧ 𝑦 = ( 𝑤𝐴 ) ) → ( ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ↔ ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ ) )
53 42 45 52 ralxfr2d ( ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) ∧ 𝑥 = ( 𝑧𝐴 ) ) → ( ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ↔ ∀ 𝑤𝐹 ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ ) )
54 37 39 53 ralxfr2d ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ↔ ∀ 𝑧𝐹𝑤𝐹 ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( ( 𝑧𝑤 ) ∩ 𝐴 ) ) ≠ ∅ ) )
55 34 54 mpbird ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ )
56 isfbas ( 𝐴 ∈ V → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ( ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴 ∧ ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∅ ∉ ( 𝐹t 𝐴 ) ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ) ) )
57 56 baibd ( ( 𝐴 ∈ V ∧ ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴 ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∅ ∉ ( 𝐹t 𝐴 ) ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ) )
58 3anan32 ( ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∅ ∉ ( 𝐹t 𝐴 ) ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ↔ ( ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ∧ ∅ ∉ ( 𝐹t 𝐴 ) ) )
59 57 58 bitrdi ( ( 𝐴 ∈ V ∧ ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴 ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ( ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ∧ ∅ ∉ ( 𝐹t 𝐴 ) ) ) )
60 59 baibd ( ( ( 𝐴 ∈ V ∧ ( 𝐹t 𝐴 ) ⊆ 𝒫 𝐴 ) ∧ ( ( 𝐹t 𝐴 ) ≠ ∅ ∧ ∀ 𝑥 ∈ ( 𝐹t 𝐴 ) ∀ 𝑦 ∈ ( 𝐹t 𝐴 ) ( ( 𝐹t 𝐴 ) ∩ 𝒫 ( 𝑥𝑦 ) ) ≠ ∅ ) ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ∅ ∉ ( 𝐹t 𝐴 ) ) )
61 4 6 17 55 60 syl22anc ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ∅ ∉ ( 𝐹t 𝐴 ) ) )
62 df-nel ( ∅ ∉ ( 𝐹t 𝐴 ) ↔ ¬ ∅ ∈ ( 𝐹t 𝐴 ) )
63 61 62 bitrdi ( ( 𝐹 ∈ ( fBas ‘ 𝑌 ) ∧ 𝐴𝑌 ) → ( ( 𝐹t 𝐴 ) ∈ ( fBas ‘ 𝐴 ) ↔ ¬ ∅ ∈ ( 𝐹t 𝐴 ) ) )