Metamath Proof Explorer


Theorem ntrneix13

Description: The closure of the union of any pair is equal to the union of closures if and only if the union of any pair belonging to the convergents of a point if equivalent to at least one of the pain belonging to the convergents of that point. (Contributed by RP, 19-Jun-2021)

Ref Expression
Hypotheses ntrnei.o O=iV,jVk𝒫jiljmi|lkm
ntrnei.f F=𝒫BOB
ntrnei.r φIFN
Assertion ntrneix13 φs𝒫Bt𝒫BIst=IsItxBs𝒫Bt𝒫BstNxsNxtNx

Proof

Step Hyp Ref Expression
1 ntrnei.o O=iV,jVk𝒫jiljmi|lkm
2 ntrnei.f F=𝒫BOB
3 ntrnei.r φIFN
4 dfss3 IstIsItxIstxIsIt
5 1 2 3 ntrneiiex φI𝒫B𝒫B
6 5 ad2antrr φs𝒫Bt𝒫BI𝒫B𝒫B
7 elmapi I𝒫B𝒫BI:𝒫B𝒫B
8 6 7 syl φs𝒫Bt𝒫BI:𝒫B𝒫B
9 1 2 3 ntrneibex φBV
10 9 ad2antrr φs𝒫Bt𝒫BBV
11 simplr φs𝒫Bt𝒫Bs𝒫B
12 11 elpwid φs𝒫Bt𝒫BsB
13 simpr φs𝒫Bt𝒫Bt𝒫B
14 13 elpwid φs𝒫Bt𝒫BtB
15 12 14 unssd φs𝒫Bt𝒫BstB
16 10 15 sselpwd φs𝒫Bt𝒫Bst𝒫B
17 8 16 ffvelcdmd φs𝒫Bt𝒫BIst𝒫B
18 17 elpwid φs𝒫Bt𝒫BIstB
19 ralss IstBxIstxIsItxBxIstxIsIt
20 18 19 syl φs𝒫Bt𝒫BxIstxIsItxBxIstxIsIt
21 4 20 bitrid φs𝒫Bt𝒫BIstIsItxBxIstxIsIt
22 dfss3 IsItIstxIsItxIst
23 8 11 ffvelcdmd φs𝒫Bt𝒫BIs𝒫B
24 23 elpwid φs𝒫Bt𝒫BIsB
25 8 13 ffvelcdmd φs𝒫Bt𝒫BIt𝒫B
26 25 elpwid φs𝒫Bt𝒫BItB
27 24 26 unssd φs𝒫Bt𝒫BIsItB
28 ralss IsItBxIsItxIstxBxIsItxIst
29 27 28 syl φs𝒫Bt𝒫BxIsItxIstxBxIsItxIst
30 22 29 bitrid φs𝒫Bt𝒫BIsItIstxBxIsItxIst
31 21 30 anbi12d φs𝒫Bt𝒫BIstIsItIsItIstxBxIstxIsItxBxIsItxIst
32 eqss Ist=IsItIstIsItIsItIst
33 ralbiim xBxIstxIsItxBxIstxIsItxBxIsItxIst
34 31 32 33 3bitr4g φs𝒫Bt𝒫BIst=IsItxBxIstxIsIt
35 3 ad3antrrr φs𝒫Bt𝒫BxBIFN
36 simpr φs𝒫Bt𝒫BxBxB
37 9 ad3antrrr φs𝒫Bt𝒫BxBBV
38 simpllr φs𝒫Bt𝒫BxBs𝒫B
39 38 elpwid φs𝒫Bt𝒫BxBsB
40 simplr φs𝒫Bt𝒫BxBt𝒫B
41 40 elpwid φs𝒫Bt𝒫BxBtB
42 39 41 unssd φs𝒫Bt𝒫BxBstB
43 37 42 sselpwd φs𝒫Bt𝒫BxBst𝒫B
44 1 2 35 36 43 ntrneiel φs𝒫Bt𝒫BxBxIststNx
45 elun xIsItxIsxIt
46 1 2 35 36 38 ntrneiel φs𝒫Bt𝒫BxBxIssNx
47 1 2 35 36 40 ntrneiel φs𝒫Bt𝒫BxBxIttNx
48 46 47 orbi12d φs𝒫Bt𝒫BxBxIsxItsNxtNx
49 45 48 bitrid φs𝒫Bt𝒫BxBxIsItsNxtNx
50 44 49 bibi12d φs𝒫Bt𝒫BxBxIstxIsItstNxsNxtNx
51 50 ralbidva φs𝒫Bt𝒫BxBxIstxIsItxBstNxsNxtNx
52 34 51 bitrd φs𝒫Bt𝒫BIst=IsItxBstNxsNxtNx
53 52 ralbidva φs𝒫Bt𝒫BIst=IsItt𝒫BxBstNxsNxtNx
54 ralcom t𝒫BxBstNxsNxtNxxBt𝒫BstNxsNxtNx
55 53 54 bitrdi φs𝒫Bt𝒫BIst=IsItxBt𝒫BstNxsNxtNx
56 55 ralbidva φs𝒫Bt𝒫BIst=IsIts𝒫BxBt𝒫BstNxsNxtNx
57 ralcom s𝒫BxBt𝒫BstNxsNxtNxxBs𝒫Bt𝒫BstNxsNxtNx
58 56 57 bitrdi φs𝒫Bt𝒫BIst=IsItxBs𝒫Bt𝒫BstNxsNxtNx