Metamath Proof Explorer


Theorem opnmbllem

Description: Lemma for opnmbl . (Contributed by Mario Carneiro, 26-Mar-2015)

Ref Expression
Hypothesis dyadmbl.1 F=x,y0x2yx+12y
Assertion opnmbllem AtopGenran.Adomvol

Proof

Step Hyp Ref Expression
1 dyadmbl.1 F=x,y0x2yx+12y
2 fveq2 z=w.z=.w
3 2 sseq1d z=w.zA.wA
4 3 elrab wzranF|.zAwranF.wA
5 simprr AtopGenran.wranF.wA.wA
6 fvex .wV
7 6 elpw .w𝒫A.wA
8 5 7 sylibr AtopGenran.wranF.wA.w𝒫A
9 4 8 sylan2b AtopGenran.wzranF|.zA.w𝒫A
10 9 ralrimiva AtopGenran.wzranF|.zA.w𝒫A
11 iccf .:*×*𝒫*
12 ffun .:*×*𝒫*Fun.
13 11 12 ax-mp Fun.
14 ssrab2 zranF|.zAranF
15 1 dyadf F:×02
16 frn F:×02ranF2
17 15 16 ax-mp ranF2
18 inss2 22
19 rexpssxrxp 2*×*
20 18 19 sstri 2*×*
21 17 20 sstri ranF*×*
22 14 21 sstri zranF|.zA*×*
23 11 fdmi dom.=*×*
24 22 23 sseqtrri zranF|.zAdom.
25 funimass4 Fun.zranF|.zAdom..zranF|.zA𝒫AwzranF|.zA.w𝒫A
26 13 24 25 mp2an .zranF|.zA𝒫AwzranF|.zA.w𝒫A
27 10 26 sylibr AtopGenran..zranF|.zA𝒫A
28 sspwuni .zranF|.zA𝒫A.zranF|.zAA
29 27 28 sylib AtopGenran..zranF|.zAA
30 eqid abs2=abs2
31 30 rexmet abs2∞Met
32 eqid MetOpenabs2=MetOpenabs2
33 30 32 tgioo topGenran.=MetOpenabs2
34 33 mopni2 abs2∞MetAtopGenran.wAr+wballabs2rA
35 31 34 mp3an1 AtopGenran.wAr+wballabs2rA
36 elssuni AtopGenran.AtopGenran.
37 uniretop =topGenran.
38 36 37 sseqtrrdi AtopGenran.A
39 38 sselda AtopGenran.wAw
40 rpre r+r
41 30 bl2ioo wrwballabs2r=wrw+r
42 39 40 41 syl2an AtopGenran.wAr+wballabs2r=wrw+r
43 42 sseq1d AtopGenran.wAr+wballabs2rAwrw+rA
44 2re 2
45 1lt2 1<2
46 expnlbnd r+21<2n12n<r
47 44 45 46 mp3an23 r+n12n<r
48 47 ad2antrl AtopGenran.wAr+wrw+rAn12n<r
49 39 ad2antrr AtopGenran.wAr+wrw+rAn12n<rw
50 2nn 2
51 nnnn0 nn0
52 51 ad2antrl AtopGenran.wAr+wrw+rAn12n<rn0
53 nnexpcl 2n02n
54 50 52 53 sylancr AtopGenran.wAr+wrw+rAn12n<r2n
55 54 nnred AtopGenran.wAr+wrw+rAn12n<r2n
56 49 55 remulcld AtopGenran.wAr+wrw+rAn12n<rw2n
57 fllelt w2nw2nw2nw2n<w2n+1
58 56 57 syl AtopGenran.wAr+wrw+rAn12n<rw2nw2nw2n<w2n+1
59 58 simpld AtopGenran.wAr+wrw+rAn12n<rw2nw2n
60 reflcl w2nw2n
61 56 60 syl AtopGenran.wAr+wrw+rAn12n<rw2n
62 54 nngt0d AtopGenran.wAr+wrw+rAn12n<r0<2n
63 ledivmul2 w2nw2n0<2nw2n2nww2nw2n
64 61 49 55 62 63 syl112anc AtopGenran.wAr+wrw+rAn12n<rw2n2nww2nw2n
65 59 64 mpbird AtopGenran.wAr+wrw+rAn12n<rw2n2nw
66 peano2re w2nw2n+1
67 61 66 syl AtopGenran.wAr+wrw+rAn12n<rw2n+1
68 67 54 nndivred AtopGenran.wAr+wrw+rAn12n<rw2n+12n
69 58 simprd AtopGenran.wAr+wrw+rAn12n<rw2n<w2n+1
70 ltmuldiv ww2n+12n0<2nw2n<w2n+1w<w2n+12n
71 49 67 55 62 70 syl112anc AtopGenran.wAr+wrw+rAn12n<rw2n<w2n+1w<w2n+12n
72 69 71 mpbid AtopGenran.wAr+wrw+rAn12n<rw<w2n+12n
73 49 68 72 ltled AtopGenran.wAr+wrw+rAn12n<rww2n+12n
74 61 54 nndivred AtopGenran.wAr+wrw+rAn12n<rw2n2n
75 elicc2 w2n2nw2n+12nww2n2nw2n+12nww2n2nwww2n+12n
76 74 68 75 syl2anc AtopGenran.wAr+wrw+rAn12n<rww2n2nw2n+12nww2n2nwww2n+12n
77 49 65 73 76 mpbir3and AtopGenran.wAr+wrw+rAn12n<rww2n2nw2n+12n
78 56 flcld AtopGenran.wAr+wrw+rAn12n<rw2n
79 1 dyadval w2nn0w2nFn=w2n2nw2n+12n
80 78 52 79 syl2anc AtopGenran.wAr+wrw+rAn12n<rw2nFn=w2n2nw2n+12n
81 80 fveq2d AtopGenran.wAr+wrw+rAn12n<r.w2nFn=.w2n2nw2n+12n
82 df-ov w2n2nw2n+12n=.w2n2nw2n+12n
83 81 82 eqtr4di AtopGenran.wAr+wrw+rAn12n<r.w2nFn=w2n2nw2n+12n
84 77 83 eleqtrrd AtopGenran.wAr+wrw+rAn12n<rw.w2nFn
85 fveq2 z=w2nFn.z=.w2nFn
86 85 sseq1d z=w2nFn.zA.w2nFnA
87 ffn F:×02FFn×0
88 15 87 ax-mp FFn×0
89 fnovrn FFn×0w2nn0w2nFnranF
90 88 78 52 89 mp3an2i AtopGenran.wAr+wrw+rAn12n<rw2nFnranF
91 simplrl AtopGenran.wAr+wrw+rAn12n<rr+
92 91 rpred AtopGenran.wAr+wrw+rAn12n<rr
93 49 92 resubcld AtopGenran.wAr+wrw+rAn12n<rwr
94 93 rexrd AtopGenran.wAr+wrw+rAn12n<rwr*
95 49 92 readdcld AtopGenran.wAr+wrw+rAn12n<rw+r
96 95 rexrd AtopGenran.wAr+wrw+rAn12n<rw+r*
97 74 92 readdcld AtopGenran.wAr+wrw+rAn12n<rw2n2n+r
98 61 recnd AtopGenran.wAr+wrw+rAn12n<rw2n
99 1cnd AtopGenran.wAr+wrw+rAn12n<r1
100 55 recnd AtopGenran.wAr+wrw+rAn12n<r2n
101 54 nnne0d AtopGenran.wAr+wrw+rAn12n<r2n0
102 98 99 100 101 divdird AtopGenran.wAr+wrw+rAn12n<rw2n+12n=w2n2n+12n
103 54 nnrecred AtopGenran.wAr+wrw+rAn12n<r12n
104 simprr AtopGenran.wAr+wrw+rAn12n<r12n<r
105 103 92 74 104 ltadd2dd AtopGenran.wAr+wrw+rAn12n<rw2n2n+12n<w2n2n+r
106 102 105 eqbrtrd AtopGenran.wAr+wrw+rAn12n<rw2n+12n<w2n2n+r
107 49 68 97 72 106 lttrd AtopGenran.wAr+wrw+rAn12n<rw<w2n2n+r
108 49 92 74 ltsubaddd AtopGenran.wAr+wrw+rAn12n<rwr<w2n2nw<w2n2n+r
109 107 108 mpbird AtopGenran.wAr+wrw+rAn12n<rwr<w2n2n
110 49 103 readdcld AtopGenran.wAr+wrw+rAn12n<rw+12n
111 74 49 103 65 leadd1dd AtopGenran.wAr+wrw+rAn12n<rw2n2n+12nw+12n
112 102 111 eqbrtrd AtopGenran.wAr+wrw+rAn12n<rw2n+12nw+12n
113 103 92 49 104 ltadd2dd AtopGenran.wAr+wrw+rAn12n<rw+12n<w+r
114 68 110 95 112 113 lelttrd AtopGenran.wAr+wrw+rAn12n<rw2n+12n<w+r
115 iccssioo wr*w+r*wr<w2n2nw2n+12n<w+rw2n2nw2n+12nwrw+r
116 94 96 109 114 115 syl22anc AtopGenran.wAr+wrw+rAn12n<rw2n2nw2n+12nwrw+r
117 83 116 eqsstrd AtopGenran.wAr+wrw+rAn12n<r.w2nFnwrw+r
118 simplrr AtopGenran.wAr+wrw+rAn12n<rwrw+rA
119 117 118 sstrd AtopGenran.wAr+wrw+rAn12n<r.w2nFnA
120 86 90 119 elrabd AtopGenran.wAr+wrw+rAn12n<rw2nFnzranF|.zA
121 funfvima2 Fun.zranF|.zAdom.w2nFnzranF|.zA.w2nFn.zranF|.zA
122 13 24 121 mp2an w2nFnzranF|.zA.w2nFn.zranF|.zA
123 120 122 syl AtopGenran.wAr+wrw+rAn12n<r.w2nFn.zranF|.zA
124 elunii w.w2nFn.w2nFn.zranF|.zAw.zranF|.zA
125 84 123 124 syl2anc AtopGenran.wAr+wrw+rAn12n<rw.zranF|.zA
126 48 125 rexlimddv AtopGenran.wAr+wrw+rAw.zranF|.zA
127 126 expr AtopGenran.wAr+wrw+rAw.zranF|.zA
128 43 127 sylbid AtopGenran.wAr+wballabs2rAw.zranF|.zA
129 128 rexlimdva AtopGenran.wAr+wballabs2rAw.zranF|.zA
130 35 129 mpd AtopGenran.wAw.zranF|.zA
131 29 130 eqelssd AtopGenran..zranF|.zA=A
132 fveq2 c=a.c=.a
133 132 sseq1d c=a.c.b.a.b
134 equequ1 c=ac=ba=b
135 133 134 imbi12d c=a.c.bc=b.a.ba=b
136 135 ralbidv c=abzranF|.zA.c.bc=bbzranF|.zA.a.ba=b
137 136 cbvrabv czranF|.zA|bzranF|.zA.c.bc=b=azranF|.zA|bzranF|.zA.a.ba=b
138 14 a1i AtopGenran.zranF|.zAranF
139 1 137 138 dyadmbl AtopGenran..zranF|.zAdomvol
140 131 139 eqeltrrd AtopGenran.Adomvol