Metamath Proof Explorer


Theorem mblfinlem4

Description: Backward direction of ismblfin . (Contributed by Brendan Leahy, 28-Mar-2018) (Revised by Brendan Leahy, 13-Jul-2018)

Ref Expression
Assertion mblfinlem4 Avol*AAdomvolvol*A=supy|bClsdtopGenran.bAy=volb<

Proof

Step Hyp Ref Expression
1 ltso <Or
2 1 a1i Avol*AAdomvol<Or
3 simplr Avol*AAdomvolvol*A
4 vex uV
5 eqeq1 y=uy=volbu=volb
6 5 anbi2d y=ubAy=volbbAu=volb
7 6 rexbidv y=ubClsdtopGenran.bAy=volbbClsdtopGenran.bAu=volb
8 4 7 elab uy|bClsdtopGenran.bAy=volbbClsdtopGenran.bAu=volb
9 simprl bClsdtopGenran.bAu=volbbA
10 ovolss bAAvol*bvol*A
11 sstr bAAb
12 ovolcl bvol*b*
13 11 12 syl bAAvol*b*
14 ovolcl Avol*A*
15 14 adantl bAAvol*A*
16 xrlenlt vol*b*vol*A*vol*bvol*A¬vol*A<vol*b
17 13 15 16 syl2anc bAAvol*bvol*A¬vol*A<vol*b
18 10 17 mpbid bAA¬vol*A<vol*b
19 18 ancoms AbA¬vol*A<vol*b
20 9 19 sylan2 AbClsdtopGenran.bAu=volb¬vol*A<vol*b
21 simprrr AbClsdtopGenran.bAu=volbu=volb
22 uniretop =topGenran.
23 22 cldss bClsdtopGenran.b
24 dfss4 bb=b
25 23 24 sylib bClsdtopGenran.b=b
26 rembl domvol
27 22 cldopn bClsdtopGenran.btopGenran.
28 opnmbl btopGenran.bdomvol
29 27 28 syl bClsdtopGenran.bdomvol
30 difmbl domvolbdomvolbdomvol
31 26 29 30 sylancr bClsdtopGenran.bdomvol
32 25 31 eqeltrrd bClsdtopGenran.bdomvol
33 mblvol bdomvolvolb=vol*b
34 32 33 syl bClsdtopGenran.volb=vol*b
35 34 ad2antrl AbClsdtopGenran.bAu=volbvolb=vol*b
36 21 35 eqtrd AbClsdtopGenran.bAu=volbu=vol*b
37 36 breq2d AbClsdtopGenran.bAu=volbvol*A<uvol*A<vol*b
38 20 37 mtbird AbClsdtopGenran.bAu=volb¬vol*A<u
39 38 rexlimdvaa AbClsdtopGenran.bAu=volb¬vol*A<u
40 8 39 biimtrid Auy|bClsdtopGenran.bAy=volb¬vol*A<u
41 40 ad2antrr Avol*AAdomvoluy|bClsdtopGenran.bAy=volb¬vol*A<u
42 41 imp Avol*AAdomvoluy|bClsdtopGenran.bAy=volb¬vol*A<u
43 1rp 1+
44 eqid seq1+absf=seq1+absf
45 44 ovolgelb Avol*A1+f2Aran.fsupranseq1+absf*<vol*A+1
46 43 45 mp3an3 Avol*Af2Aran.fsupranseq1+absf*<vol*A+1
47 elmapi f2f:2
48 ssid ran.fran.f
49 44 ovollb f:2ran.fran.fvol*ran.fsupranseq1+absf*<
50 48 49 mpan2 f:2vol*ran.fsupranseq1+absf*<
51 50 adantl vol*Af:2vol*ran.fsupranseq1+absf*<
52 eqid absf=absf
53 52 44 ovolsf f:2seq1+absf:0+∞
54 frn seq1+absf:0+∞ranseq1+absf0+∞
55 icossxr 0+∞*
56 54 55 sstrdi seq1+absf:0+∞ranseq1+absf*
57 supxrcl ranseq1+absf*supranseq1+absf*<*
58 53 56 57 3syl f:2supranseq1+absf*<*
59 peano2re vol*Avol*A+1
60 59 rexrd vol*Avol*A+1*
61 rncoss ran.fran.
62 61 unissi ran.fran.
63 unirnioo =ran.
64 62 63 sseqtrri ran.f
65 ovolcl ran.fvol*ran.f*
66 64 65 ax-mp vol*ran.f*
67 xrletr vol*ran.f*supranseq1+absf*<*vol*A+1*vol*ran.fsupranseq1+absf*<supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
68 66 67 mp3an1 supranseq1+absf*<*vol*A+1*vol*ran.fsupranseq1+absf*<supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
69 58 60 68 syl2anr vol*Af:2vol*ran.fsupranseq1+absf*<supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
70 51 69 mpand vol*Af:2supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
71 70 adantll Avol*Af:2supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
72 47 71 sylan2 Avol*Af2supranseq1+absf*<vol*A+1vol*ran.fvol*A+1
73 72 anim2d Avol*Af2Aran.fsupranseq1+absf*<vol*A+1Aran.fvol*ran.fvol*A+1
74 73 reximdva Avol*Af2Aran.fsupranseq1+absf*<vol*A+1f2Aran.fvol*ran.fvol*A+1
75 46 74 mpd Avol*Af2Aran.fvol*ran.fvol*A+1
76 rexex f2Aran.fvol*ran.fvol*A+1fAran.fvol*ran.fvol*A+1
77 75 76 syl Avol*AfAran.fvol*ran.fvol*A+1
78 77 ad2antrr Avol*AAdomvoluu<vol*AfAran.fvol*ran.fvol*A+1
79 difss ran.fAran.f
80 79 64 sstri ran.fA
81 ovolcl ran.fAvol*ran.fA*
82 80 81 ax-mp vol*ran.fA*
83 59 82 jctil vol*Avol*ran.fA*vol*A+1
84 83 ad4antlr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fA*vol*A+1
85 ovolss ran.fAran.fran.fvol*ran.fAvol*ran.f
86 79 64 85 mp2an vol*ran.fAvol*ran.f
87 xrletr vol*ran.fA*vol*ran.f*vol*A+1*vol*ran.fAvol*ran.fvol*ran.fvol*A+1vol*ran.fAvol*A+1
88 82 66 87 mp3an12 vol*A+1*vol*ran.fAvol*ran.fvol*ran.fvol*A+1vol*ran.fAvol*A+1
89 60 88 syl vol*Avol*ran.fAvol*ran.fvol*ran.fvol*A+1vol*ran.fAvol*A+1
90 86 89 mpani vol*Avol*ran.fvol*A+1vol*ran.fAvol*A+1
91 90 ad4antlr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fAvol*A+1
92 91 impr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fAvol*A+1
93 ovolge0 ran.fA0vol*ran.fA
94 80 93 ax-mp 0vol*ran.fA
95 92 94 jctil Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+10vol*ran.fAvol*ran.fAvol*A+1
96 xrrege0 vol*ran.fA*vol*A+10vol*ran.fAvol*ran.fAvol*A+1vol*ran.fA
97 84 95 96 syl2anc Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fA
98 resubcl vol*Auvol*Au
99 98 adantrr vol*Auu<vol*Avol*Au
100 posdif uvol*Au<vol*A0<vol*Au
101 100 ancoms vol*Auu<vol*A0<vol*Au
102 101 biimpd vol*Auu<vol*A0<vol*Au
103 102 impr vol*Auu<vol*A0<vol*Au
104 99 103 elrpd vol*Auu<vol*Avol*Au+
105 104 rphalfcld vol*Auu<vol*Avol*Au2+
106 3 105 sylan Avol*AAdomvoluu<vol*Avol*Au2+
107 106 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*Au2+
108 eqid seq1+absg=seq1+absg
109 108 ovolgelb ran.fAvol*ran.fAvol*Au2+g2ran.fAran.gsupranseq1+absg*<vol*ran.fA+vol*Au2
110 80 109 mp3an1 vol*ran.fAvol*Au2+g2ran.fAran.gsupranseq1+absg*<vol*ran.fA+vol*Au2
111 97 107 110 syl2anc Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g2ran.fAran.gsupranseq1+absg*<vol*ran.fA+vol*Au2
112 elmapi g2g:2
113 ssid ran.gran.g
114 108 ovollb g:2ran.gran.gvol*ran.gsupranseq1+absg*<
115 113 114 mpan2 g:2vol*ran.gsupranseq1+absg*<
116 115 adantl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g:2vol*ran.gsupranseq1+absg*<
117 eqid absg=absg
118 117 108 ovolsf g:2seq1+absg:0+∞
119 frn seq1+absg:0+∞ranseq1+absg0+∞
120 119 55 sstrdi seq1+absg:0+∞ranseq1+absg*
121 supxrcl ranseq1+absg*supranseq1+absg*<*
122 118 120 121 3syl g:2supranseq1+absg*<*
123 99 rehalfcld vol*Auu<vol*Avol*Au2
124 3 123 sylan Avol*AAdomvoluu<vol*Avol*Au2
125 124 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*Au2
126 97 125 readdcld Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fA+vol*Au2
127 126 rexrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fA+vol*Au2*
128 rncoss ran.gran.
129 128 unissi ran.gran.
130 129 63 sseqtrri ran.g
131 ovolcl ran.gvol*ran.g*
132 130 131 ax-mp vol*ran.g*
133 xrletr vol*ran.g*supranseq1+absg*<*vol*ran.fA+vol*Au2*vol*ran.gsupranseq1+absg*<supranseq1+absg*<vol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
134 132 133 mp3an1 supranseq1+absg*<*vol*ran.fA+vol*Au2*vol*ran.gsupranseq1+absg*<supranseq1+absg*<vol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
135 122 127 134 syl2anr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g:2vol*ran.gsupranseq1+absg*<supranseq1+absg*<vol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
136 116 135 mpand Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g:2supranseq1+absg*<vol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
137 112 136 sylan2 Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g2supranseq1+absg*<vol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
138 137 anim2d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g2ran.fAran.gsupranseq1+absg*<vol*ran.fA+vol*Au2ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2
139 138 reximdva Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g2ran.fAran.gsupranseq1+absg*<vol*ran.fA+vol*Au2g2ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2
140 111 139 mpd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1g2ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2
141 rexex g2ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2gran.fAran.gvol*ran.gvol*ran.fA+vol*Au2
142 140 141 syl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1gran.fAran.gvol*ran.gvol*ran.fA+vol*Au2
143 59 66 jctil vol*Avol*ran.f*vol*A+1
144 143 ad3antlr Avol*AAdomvoluu<vol*Avol*ran.f*vol*A+1
145 ovolge0 ran.f0vol*ran.f
146 64 145 ax-mp 0vol*ran.f
147 146 jctl vol*ran.fvol*A+10vol*ran.fvol*ran.fvol*A+1
148 147 adantl Aran.fvol*ran.fvol*A+10vol*ran.fvol*ran.fvol*A+1
149 xrrege0 vol*ran.f*vol*A+10vol*ran.fvol*ran.fvol*A+1vol*ran.f
150 144 148 149 syl2an Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.f
151 150 125 resubcld Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fvol*Au2
152 150 107 ltsubrpd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fvol*Au2<vol*ran.f
153 retop topGenran.Top
154 retopbas ran.TopBases
155 bastg ran.TopBasesran.topGenran.
156 154 155 ax-mp ran.topGenran.
157 61 156 sstri ran.ftopGenran.
158 uniopn topGenran.Topran.ftopGenran.ran.ftopGenran.
159 153 157 158 mp2an ran.ftopGenran.
160 mblfinlem2 ran.ftopGenran.vol*ran.fvol*Au2vol*ran.fvol*Au2<vol*ran.fsClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*s
161 159 160 mp3an1 vol*ran.fvol*Au2vol*ran.fvol*Au2<vol*ran.fsClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*s
162 151 152 161 syl2anc Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*s
163 162 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*s
164 indif2 sran.g=sran.g
165 22 cldss sClsdtopGenran.s
166 df-ss ss=s
167 165 166 sylib sClsdtopGenran.s=s
168 167 difeq1d sClsdtopGenran.sran.g=sran.g
169 164 168 eqtrid sClsdtopGenran.sran.g=sran.g
170 128 156 sstri ran.gtopGenran.
171 uniopn topGenran.Topran.gtopGenran.ran.gtopGenran.
172 153 170 171 mp2an ran.gtopGenran.
173 22 opncld topGenran.Topran.gtopGenran.ran.gClsdtopGenran.
174 153 172 173 mp2an ran.gClsdtopGenran.
175 incld sClsdtopGenran.ran.gClsdtopGenran.sran.gClsdtopGenran.
176 174 175 mpan2 sClsdtopGenran.sran.gClsdtopGenran.
177 169 176 eqeltrrd sClsdtopGenran.sran.gClsdtopGenran.
178 simpr ran.fAran.gsran.fsran.f
179 simpl ran.fAran.gsran.fran.fAran.g
180 178 179 ssdif2d ran.fAran.gsran.fsran.gran.fran.fA
181 dfin4 ran.fA=ran.fran.fA
182 inss2 ran.fAA
183 181 182 eqsstrri ran.fran.fAA
184 180 183 sstrdi ran.fAran.gsran.fsran.gA
185 sseq1 b=sran.gbAsran.gA
186 185 anbi1d b=sran.gbAvolsran.g=volbsran.gAvolsran.g=volb
187 fveq2 sran.g=bvolsran.g=volb
188 187 eqcoms b=sran.gvolsran.g=volb
189 188 biantrud b=sran.gsran.gAsran.gAvolsran.g=volb
190 186 189 bitr4d b=sran.gbAvolsran.g=volbsran.gA
191 190 rspcev sran.gClsdtopGenran.sran.gAbClsdtopGenran.bAvolsran.g=volb
192 177 184 191 syl2an sClsdtopGenran.ran.fAran.gsran.fbClsdtopGenran.bAvolsran.g=volb
193 192 an12s ran.fAran.gsClsdtopGenran.sran.fbClsdtopGenran.bAvolsran.g=volb
194 193 adantrrr ran.fAran.gsClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*sbClsdtopGenran.bAvolsran.g=volb
195 194 adantlr ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*sbClsdtopGenran.bAvolsran.g=volb
196 195 adantll Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*sbClsdtopGenran.bAvolsran.g=volb
197 difss Asran.gA
198 ovolsscl Asran.gAAvol*Avol*Asran.g
199 197 198 mp3an1 Avol*Avol*Asran.g
200 199 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asran.g
201 simp-6r Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*A
202 simpl uu<vol*Au
203 202 ad4antlr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*su
204 difdif2 Asran.g=AsAran.g
205 204 fveq2i vol*Asran.g=vol*AsAran.g
206 difss AsA
207 inss1 Aran.gA
208 206 207 unssi AsAran.gA
209 ovolsscl AsAran.gAAvol*Avol*AsAran.g
210 208 209 mp3an1 Avol*Avol*AsAran.g
211 210 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*AsAran.g
212 ovolsscl AsAAvol*Avol*As
213 206 212 mp3an1 Avol*Avol*As
214 213 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*As
215 ovolsscl Aran.gAAvol*Avol*Aran.g
216 207 215 mp3an1 Avol*Avol*Aran.g
217 216 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Aran.g
218 214 217 readdcld Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*As+vol*Aran.g
219 3 202 98 syl2an Avol*AAdomvoluu<vol*Avol*Au
220 219 ad3antrrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Au
221 ssdifss AAs
222 221 adantr Avol*AAs
223 ssinss1 AAran.g
224 223 adantr Avol*AAran.g
225 ovolun Asvol*AsAran.gvol*Aran.gvol*AsAran.gvol*As+vol*Aran.g
226 222 213 224 216 225 syl22anc Avol*Avol*AsAran.gvol*As+vol*Aran.g
227 226 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*AsAran.gvol*As+vol*Aran.g
228 124 ad2antrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*Au2
229 228 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Au2
230 150 ad2antrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.f
231 simprl sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*ssran.f
232 150 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.f
233 ovolsscl sran.fran.fvol*ran.fvol*s
234 64 233 mp3an2 sran.fvol*ran.fvol*s
235 231 232 234 syl2anr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*s
236 230 235 resubcld Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*s
237 ssdif Aran.fAsran.fs
238 difss ran.fsran.f
239 238 64 sstri ran.fs
240 ovolss Asran.fsran.fsvol*Asvol*ran.fs
241 237 239 240 sylancl Aran.fvol*Asvol*ran.fs
242 241 adantr Aran.fvol*ran.fvol*A+1vol*Asvol*ran.fs
243 242 ad3antlr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asvol*ran.fs
244 eleq1w b=sbdomvolsdomvol
245 244 32 vtoclga sClsdtopGenran.sdomvol
246 245 adantr sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*ssdomvol
247 mblsplit sdomvolran.fvol*ran.fvol*ran.f=vol*ran.fs+vol*ran.fs
248 64 247 mp3an2 sdomvolvol*ran.fvol*ran.f=vol*ran.fs+vol*ran.fs
249 246 232 248 syl2anr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.f=vol*ran.fs+vol*ran.fs
250 249 eqcomd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fs+vol*ran.fs=vol*ran.f
251 230 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.f
252 inss1 ran.fsran.f
253 ovolsscl ran.fsran.fran.fvol*ran.fvol*ran.fs
254 252 64 253 mp3an12 vol*ran.fvol*ran.fs
255 150 254 syl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fs
256 255 ad2antrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fs
257 256 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fs
258 ovolsscl ran.fsran.fran.fvol*ran.fvol*ran.fs
259 238 64 258 mp3an12 vol*ran.fvol*ran.fs
260 150 259 syl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fs
261 260 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.fs
262 261 ad2antrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fs
263 251 257 262 subaddd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*ran.fs=vol*ran.fsvol*ran.fs+vol*ran.fs=vol*ran.f
264 250 263 mpbird Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*ran.fs=vol*ran.fs
265 sseqin2 sran.fran.fs=s
266 265 biimpi sran.fran.fs=s
267 266 fveq2d sran.fvol*ran.fs=vol*s
268 267 oveq2d sran.fvol*ran.fvol*ran.fs=vol*ran.fvol*s
269 268 adantr sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*ran.fs=vol*ran.fvol*s
270 269 ad2antll Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*ran.fs=vol*ran.fvol*s
271 264 270 eqtr3d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fs=vol*ran.fvol*s
272 243 271 breqtrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asvol*ran.fvol*s
273 simprrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*Au2<vol*s
274 230 229 235 273 ltsub23d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*ran.fvol*s<vol*Au2
275 214 236 229 272 274 lelttrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*As<vol*Au2
276 216 ad4antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*Aran.g
277 126 132 jctil Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vol*ran.g*vol*ran.fA+vol*Au2
278 simpr ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
279 ovolge0 ran.g0vol*ran.g
280 130 279 ax-mp 0vol*ran.g
281 278 280 jctil ran.fAran.gvol*ran.gvol*ran.fA+vol*Au20vol*ran.gvol*ran.gvol*ran.fA+vol*Au2
282 xrrege0 vol*ran.g*vol*ran.fA+vol*Au20vol*ran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.g
283 277 281 282 syl2an Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.g
284 difss ran.gran.fAran.g
285 ovolsscl ran.gran.fAran.gran.gvol*ran.gvol*ran.gran.fA
286 284 130 285 mp3an12 vol*ran.gvol*ran.gran.fA
287 283 286 syl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gran.fA
288 ssun2 ran.gAran.gran.fran.gA
289 incom Aran.g=ran.gA
290 difdif2 ran.gran.fA=ran.gran.fran.gA
291 288 289 290 3sstr4i Aran.gran.gran.fA
292 284 130 sstri ran.gran.fA
293 291 292 pm3.2i Aran.gran.gran.fAran.gran.fA
294 ovolss Aran.gran.gran.fAran.gran.fAvol*Aran.gvol*ran.gran.fA
295 293 294 mp1i Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*Aran.gvol*ran.gran.fA
296 opnmbl ran.ftopGenran.ran.fdomvol
297 159 296 ax-mp ran.fdomvol
298 difmbl ran.fdomvolAdomvolran.fAdomvol
299 297 298 mpan Adomvolran.fAdomvol
300 299 ad4antlr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2ran.fAdomvol
301 mblsplit ran.fAdomvolran.gvol*ran.gvol*ran.g=vol*ran.gran.fA+vol*ran.gran.fA
302 130 301 mp3an2 ran.fAdomvolvol*ran.gvol*ran.g=vol*ran.gran.fA+vol*ran.gran.fA
303 300 283 302 syl2anc Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.g=vol*ran.gran.fA+vol*ran.gran.fA
304 sseqin2 ran.fAran.gran.gran.fA=ran.fA
305 304 biimpi ran.fAran.gran.gran.fA=ran.fA
306 305 fveq2d ran.fAran.gvol*ran.gran.fA=vol*ran.fA
307 306 oveq1d ran.fAran.gvol*ran.gran.fA+vol*ran.gran.fA=vol*ran.fA+vol*ran.gran.fA
308 307 ad2antrl Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gran.fA+vol*ran.gran.fA=vol*ran.fA+vol*ran.gran.fA
309 303 308 eqtr2d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.fA+vol*ran.gran.fA=vol*ran.g
310 283 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.g
311 97 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.fA
312 311 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.fA
313 287 recnd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gran.fA
314 310 312 313 subaddd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fA=vol*ran.gran.fAvol*ran.fA+vol*ran.gran.fA=vol*ran.g
315 309 314 mpbird Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fA=vol*ran.gran.fA
316 simprr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fA+vol*Au2
317 283 311 228 lesubadd2d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fAvol*Au2vol*ran.gvol*ran.fA+vol*Au2
318 316 317 mpbird Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gvol*ran.fAvol*Au2
319 315 318 eqbrtrrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*ran.gran.fAvol*Au2
320 276 287 228 295 319 letrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vol*Aran.gvol*Au2
321 320 adantr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Aran.gvol*Au2
322 214 217 229 229 275 321 ltleaddd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*As+vol*Aran.g<vol*Au2+vol*Au2
323 98 recnd vol*Auvol*Au
324 323 2halvesd vol*Auvol*Au2+vol*Au2=vol*Au
325 324 adantll Avol*Auvol*Au2+vol*Au2=vol*Au
326 325 ad2ant2r Avol*AAdomvoluu<vol*Avol*Au2+vol*Au2=vol*Au
327 326 ad3antrrr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Au2+vol*Au2=vol*Au
328 322 327 breqtrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*As+vol*Aran.g<vol*Au
329 211 218 220 227 328 lelttrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*AsAran.g<vol*Au
330 205 329 eqbrtrid Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asran.g<vol*Au
331 200 201 203 330 ltsub13d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*su<vol*Avol*Asran.g
332 opnmbl ran.gtopGenran.ran.gdomvol
333 172 332 ax-mp ran.gdomvol
334 difmbl sdomvolran.gdomvolsran.gdomvol
335 245 333 334 sylancl sClsdtopGenran.sran.gdomvol
336 mblvol sran.gdomvolvolsran.g=vol*sran.g
337 335 336 syl sClsdtopGenran.volsran.g=vol*sran.g
338 337 ad2antrl ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svolsran.g=vol*sran.g
339 sseqin2 sran.gAAsran.g=sran.g
340 184 339 sylib ran.fAran.gsran.fAsran.g=sran.g
341 340 fveq2d ran.fAran.gsran.fvol*Asran.g=vol*sran.g
342 341 adantrr ran.fAran.gsran.fvol*ran.fvol*Au2<vol*svol*Asran.g=vol*sran.g
343 342 ad2ant2rl ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asran.g=vol*sran.g
344 338 343 eqtr4d ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svolsran.g=vol*Asran.g
345 344 adantll Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svolsran.g=vol*Asran.g
346 335 adantr sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*ssran.gdomvol
347 simp-4l Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2Avol*A
348 mblsplit sran.gdomvolAvol*Avol*A=vol*Asran.g+vol*Asran.g
349 348 3expb sran.gdomvolAvol*Avol*A=vol*Asran.g+vol*Asran.g
350 349 eqcomd sran.gdomvolAvol*Avol*Asran.g+vol*Asran.g=vol*A
351 346 347 350 syl2anr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Asran.g+vol*Asran.g=vol*A
352 recn vol*Avol*A
353 352 adantl Avol*Avol*A
354 199 recnd Avol*Avol*Asran.g
355 inss1 Asran.gA
356 ovolsscl Asran.gAAvol*Avol*Asran.g
357 355 356 mp3an1 Avol*Avol*Asran.g
358 357 recnd Avol*Avol*Asran.g
359 353 354 358 subadd2d Avol*Avol*Avol*Asran.g=vol*Asran.gvol*Asran.g+vol*Asran.g=vol*A
360 359 ad5antr Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Avol*Asran.g=vol*Asran.gvol*Asran.g+vol*Asran.g=vol*A
361 351 360 mpbird Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svol*Avol*Asran.g=vol*Asran.g
362 345 361 eqtr4d Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svolsran.g=vol*Avol*Asran.g
363 331 362 breqtrrd Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*su<volsran.g
364 fvex volsran.gV
365 eqeq1 v=volsran.gv=volbvolsran.g=volb
366 365 anbi2d v=volsran.gbAv=volbbAvolsran.g=volb
367 366 rexbidv v=volsran.gbClsdtopGenran.bAv=volbbClsdtopGenran.bAvolsran.g=volb
368 breq2 v=volsran.gu<vu<volsran.g
369 367 368 anbi12d v=volsran.gbClsdtopGenran.bAv=volbu<vbClsdtopGenran.bAvolsran.g=volbu<volsran.g
370 364 369 spcev bClsdtopGenran.bAvolsran.g=volbu<volsran.gvbClsdtopGenran.bAv=volbu<v
371 196 363 370 syl2anc Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2sClsdtopGenran.sran.fvol*ran.fvol*Au2<vol*svbClsdtopGenran.bAv=volbu<v
372 163 371 rexlimddv Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1ran.fAran.gvol*ran.gvol*ran.fA+vol*Au2vbClsdtopGenran.bAv=volbu<v
373 142 372 exlimddv Avol*AAdomvoluu<vol*AAran.fvol*ran.fvol*A+1vbClsdtopGenran.bAv=volbu<v
374 78 373 exlimddv Avol*AAdomvoluu<vol*AvbClsdtopGenran.bAv=volbu<v
375 eqeq1 y=vy=volbv=volb
376 375 anbi2d y=vbAy=volbbAv=volb
377 376 rexbidv y=vbClsdtopGenran.bAy=volbbClsdtopGenran.bAv=volb
378 377 rexab vy|bClsdtopGenran.bAy=volbu<vvbClsdtopGenran.bAv=volbu<v
379 374 378 sylibr Avol*AAdomvoluu<vol*Avy|bClsdtopGenran.bAy=volbu<v
380 2 3 42 379 eqsupd Avol*AAdomvolsupy|bClsdtopGenran.bAy=volb<=vol*A
381 380 eqcomd Avol*AAdomvolvol*A=supy|bClsdtopGenran.bAy=volb<