Metamath Proof Explorer


Theorem tgcl

Description: Show that a basis generates a topology. Remark in Munkres p. 79. (Contributed by NM, 17-Jul-2006)

Ref Expression
Assertion tgcl BTopBasestopGenBTop

Proof

Step Hyp Ref Expression
1 uniss utopGenButopGenB
2 1 adantl BTopBasesutopGenButopGenB
3 unitg BTopBasestopGenB=B
4 3 adantr BTopBasesutopGenBtopGenB=B
5 2 4 sseqtrd BTopBasesutopGenBuB
6 eluni2 xutuxt
7 ssel2 utopGenBtuttopGenB
8 eltg2b BTopBasesttopGenBxtyBxyyt
9 rsp xtyBxyytxtyBxyyt
10 8 9 syl6bi BTopBasesttopGenBxtyBxyyt
11 10 imp31 BTopBasesttopGenBxtyBxyyt
12 11 an32s BTopBasesxtttopGenByBxyyt
13 7 12 sylan2 BTopBasesxtutopGenBtuyBxyyt
14 13 an42s BTopBasesutopGenBtuxtyBxyyt
15 elssuni tutu
16 sstr2 yttuyu
17 15 16 syl5com tuytyu
18 17 anim2d tuxyytxyyu
19 18 reximdv tuyBxyytyBxyyu
20 19 ad2antrl BTopBasesutopGenBtuxtyBxyytyBxyyu
21 14 20 mpd BTopBasesutopGenBtuxtyBxyyu
22 21 rexlimdvaa BTopBasesutopGenBtuxtyBxyyu
23 6 22 biimtrid BTopBasesutopGenBxuyBxyyu
24 23 ralrimiv BTopBasesutopGenBxuyBxyyu
25 5 24 jca BTopBasesutopGenBuBxuyBxyyu
26 25 ex BTopBasesutopGenBuBxuyBxyyu
27 eltg2 BTopBasesutopGenBuBxuyBxyyu
28 26 27 sylibrd BTopBasesutopGenButopGenB
29 28 alrimiv BTopBasesuutopGenButopGenB
30 inss1 uvu
31 tg1 utopGenBuB
32 30 31 sstrid utopGenBuvB
33 32 ad2antrl BTopBasesutopGenBvtopGenBuvB
34 eltg2 BTopBasesutopGenBuBxuzBxzzu
35 34 simplbda BTopBasesutopGenBxuzBxzzu
36 rsp xuzBxzzuxuzBxzzu
37 35 36 syl BTopBasesutopGenBxuzBxzzu
38 eltg2 BTopBasesvtopGenBvBxvwBxwwv
39 38 simplbda BTopBasesvtopGenBxvwBxwwv
40 rsp xvwBxwwvxvwBxwwv
41 39 40 syl BTopBasesvtopGenBxvwBxwwv
42 37 41 im2anan9 BTopBasesutopGenBBTopBasesvtopGenBxuxvzBxzzuwBxwwv
43 elin xuvxuxv
44 reeanv zBwBxzzuxwwvzBxzzuwBxwwv
45 42 43 44 3imtr4g BTopBasesutopGenBBTopBasesvtopGenBxuvzBwBxzzuxwwv
46 45 anandis BTopBasesutopGenBvtopGenBxuvzBwBxzzuxwwv
47 elin xzwxzxw
48 47 biimpri xzxwxzw
49 ss2in zuwvzwuv
50 48 49 anim12i xzxwzuwvxzwzwuv
51 50 an4s xzzuxwwvxzwzwuv
52 basis2 BTopBaseszBwBxzwtBxttzw
53 52 adantllr BTopBasesxuvzBwBxzwtBxttzw
54 53 adantrrr BTopBasesxuvzBwBxzwzwuvtBxttzw
55 sstr2 tzwzwuvtuv
56 55 com12 zwuvtzwtuv
57 56 anim2d zwuvxttzwxttuv
58 57 reximdv zwuvtBxttzwtBxttuv
59 58 adantl xzwzwuvtBxttzwtBxttuv
60 59 ad2antll BTopBasesxuvzBwBxzwzwuvtBxttzwtBxttuv
61 54 60 mpd BTopBasesxuvzBwBxzwzwuvtBxttuv
62 51 61 sylanr2 BTopBasesxuvzBwBxzzuxwwvtBxttuv
63 62 rexlimdvaa BTopBasesxuvzBwBxzzuxwwvtBxttuv
64 63 rexlimdva BTopBasesxuvzBwBxzzuxwwvtBxttuv
65 64 ex BTopBasesxuvzBwBxzzuxwwvtBxttuv
66 65 a2d BTopBasesxuvzBwBxzzuxwwvxuvtBxttuv
67 66 imp BTopBasesxuvzBwBxzzuxwwvxuvtBxttuv
68 46 67 syldan BTopBasesutopGenBvtopGenBxuvtBxttuv
69 68 ralrimiv BTopBasesutopGenBvtopGenBxuvtBxttuv
70 33 69 jca BTopBasesutopGenBvtopGenBuvBxuvtBxttuv
71 70 ex BTopBasesutopGenBvtopGenBuvBxuvtBxttuv
72 eltg2 BTopBasesuvtopGenBuvBxuvtBxttuv
73 71 72 sylibrd BTopBasesutopGenBvtopGenBuvtopGenB
74 73 ralrimivv BTopBasesutopGenBvtopGenBuvtopGenB
75 fvex topGenBV
76 istopg topGenBVtopGenBTopuutopGenButopGenButopGenBvtopGenBuvtopGenB
77 75 76 ax-mp topGenBTopuutopGenButopGenButopGenBvtopGenBuvtopGenB
78 29 74 77 sylanbrc BTopBasestopGenBTop