Table of ContentsTable of Contents Mathbox for Jeff Madsen < Previous   Next >
Related theorems
Unicode version

Theorem heiborlem36 12046
Description: Lemma for heibor 12053. Combine the two bounds in heiborlem34 12044 and heiborlem35 12045 to get a ball in H lying completely within a ball of arbitrary radius about Y.
Hypotheses
Ref Expression
heibor.1 |- J = (Open` M)
heibor.2 |- X = dom dom M
heibor.9 |- M e. CMet
heibor.10 |- M e. TotBnd
heibor.11 |- U (_ J
heibor.12 |- X = U.U
heibor.13 |- D = {s e. P~X | -. E.v e. (P~U i^i Fin)s (_ U.v}
heibor.14 |- B = {<.x, r>. | ((x e. X /\ r e. RR+) /\ (x( ball ` M)r) e. D)}
heibor.15 |- G = {<.<.n, a>., h>. | ((n e. NN /\ a e. B) /\ h = {<.x, r>. | ((x e. X /\ r = (1 / (2^n))) /\ ((x( ball ` M)r) e. D /\ ((x( ball ` M)r) i^i (( ball ` M)` a)) =/= (/)))})}
Assertion
Ref Expression
heiborlem36 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g)) /\ (1st o. H)(~~>m` M)Y) /\ (Y e. X /\ R e. RR+)) -> E.p e. NN (( ball ` M)` (H` p)) (_ (Y( ball ` M)R))
Distinct variable groups:   n,M,r,s,v,x   n,J,s,v,x   n,X,r,s,v,x   x,U   B,n   Y,r,x   U,p,s,v   Y,a,h,n,p,s,v   D,a,h,n,r,x   X,a,g,h,p   H,a,g,h,n,p,r,s,v,x   B,a,g,h,p   M,a,g,h,p   g,G,p   R,a,h,n,p,r,s,v,x

Proof of Theorem heiborlem36
StepHypRef Expression
1 heibor.1 . . . . 5 |- J = (Open` M)
2 heibor.2 . . . . 5 |- X = dom dom M
3 heibor.9 . . . . 5 |- M e. CMet
4 heibor.10 . . . . 5 |- M e. TotBnd
5 heibor.11 . . . . 5 |- U (_ J
6 heibor.12 . . . . 5 |- X = U.U
7 heibor.13 . . . . 5 |- D = {s e. P~X | -. E.v e. (P~U i^i Fin)s (_ U.v}
8 heibor.14 . . . . 5 |- B = {<.x, r>. | ((x e. X /\ r e. RR+) /\ (x( ball ` M)r) e. D)}
9 heibor.15 . . . . 5 |- G = {<.<.n, a>., h>. | ((n e. NN /\ a e. B) /\ h = {<.x, r>. | ((x e. X /\ r = (1 / (2^n))) /\ ((x( ball ` M)r) e. D /\ ((x( ball ` M)r) i^i (( ball ` M)` a)) =/= (/)))})}
101, 2, 3, 4, 5, 6, 7, 8, 9heiborlem34 12044 . . . 4 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g)) /\ (1st o. H)(~~>m` M)Y) /\ (Y e. X /\ (R / 2) e. RR+)) -> E.j e. NN A.m e. NN (j <_ m -> ((1st` (H` m))MY) < (R / 2)))
111, 2, 3, 4, 5, 6, 7, 8, 9heiborlem35 12045 . . . 4 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g)) /\ (1st o. H)(~~>m` M)Y) /\ (Y e. X /\ (R / 2) e. RR+)) -> E.l e. NN A.m e. NN (l <_ m -> A.y e. (( ball ` M)` (H` m))((1st` (H` m))My) < (R / 2)))
1210, 11jca 286 . . 3 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g)) /\ (1st o. H)(~~>m` M)Y) /\ (Y e. X /\ (R / 2) e. RR+)) -> (E.j e. NN A.m e. NN (j <_ m -> ((1st` (H` m))MY) < (R / 2)) /\ E.l e. NN A.m e. NN (l <_ m -> A.y e. (( ball ` M)` (H` m))((1st` (H` m))My) < (R / 2))))
13 2re 6125 . . . . 5 |- 2 e. RR
14 2pos 6135 . . . . 5 |- 0 < 2
1513, 14elrpii 6193 . . . 4 |- 2 e. RR+
16 rpdivcl 6208 . . . 4 |- ((R e. RR+ /\ 2 e. RR+) -> (R / 2) e. RR+)
1715, 16mpan2 700 . . 3 |- (R e. RR+ -> (R / 2) e. RR+)
1812, 17sylanr2 465 . 2 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g)) /\ (1st o. H)(~~>m` M)Y) /\ (Y e. X /\ R e. RR+)) -> (E.j e. NN A.m e. NN (j <_ m -> ((1st` (H` m))MY) < (R / 2)) /\ E.l e. NN A.m e. NN (l <_ m -> A.y e. (( ball ` M)` (H` m))((1st` (H` m))My) < (R / 2))))
19 prth 559 . . . . . . . . . . . . . . . . 17 |- (((j <_ p -> ((1st` (H` p))MY) < (R / 2)) /\ (l <_ p -> A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2))) -> ((j <_ p /\ l <_ p) -> (((1st`
(H` p))MY) < (R / 2) /\ A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2))))
20 ffvelrn 3928 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ((H:NN-->B /\ p e. NN) -> (H` p) e. B)
211, 2, 3, 4, 5, 6, 7, 8heiborlem24 12034 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ((H` p) e. B <-> ((H` p) e. (X X. RR+) /\ (( ball ` M)` (H` p)) e. D))
2221pm3.26bi 320 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ((H` p) e. B -> (H` p) e. (X X. RR+))
23 elxp6 4161 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ((H` p) e. (X X. RR+) <-> ((H` p) = <.(1st`
(H` p)), (2nd` (H` p))>. /\ ((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+)))
2423pm3.26bi 320 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ((H` p) e. (X X. RR+) -> (H` p) = <.(1st` (H` p)), (2nd` (H` p))>.)
2522, 24syl 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((H` p) e. B -> (H` p) = <.(1st` (H` p)), (2nd` (H` p))>.)
2625fveq2d 3839 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ((H` p) e. B -> (( ball ` M)` (H` p)) = (( ball ` M)` <.(1st`
(H` p)), (2nd` (H` p))>.))
27 df-opr 4023 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ((1st` (H` p))( ball ` M)(2nd` (H` p))) = (( ball ` M)` <.(1st` (H` p)), (2nd` (H` p))>.)
2826, 27syl6eqr 1568 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ((H` p) e. B -> (( ball ` M)` (H` p)) = ((1st` (H` p))( ball ` M)(2nd`
(H` p))))
2920, 28syl 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ((H:NN-->B /\ p e. NN) -> (( ball ` M)` (H` p)) = ((1st` (H` p))( ball ` M)(2nd` (H` p))))
3029adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> (( ball ` M)` (H` p)) = ((1st` (H` p))( ball ` M)(2nd` (H` p))))
3130adantllr 397 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> (( ball ` M)` (H` p)) = ((1st`
(H` p))( ball ` M)(2nd` (H` p))))
3231ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) -> (( ball ` M)` (H` p)) = ((1st` (H` p))( ball ` M)(2nd` (H` p))))
3332eleq2d 1584 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. (( ball ` M)` (H` p)) <-> y e. ((1st` (H` p))( ball ` M)(2nd`
(H` p)))))
3423pm3.27bi 324 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ((H` p) e. (X X. RR+) -> ((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+))
352elbl 8048 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- (((M e. Met /\ (1st` (H` p)) e. X) /\ ((2nd` (H` p)) e. RR /\ 0 < (2nd` (H` p)))) -> (y e. ((1st` (H` p))( ball ` M)(2nd`
(H` p))) <-> (y e. X /\ ((1st`
(H` p))My) < (2nd` (H` p)))))
363cmsmeti 8173 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- M e. Met
3736a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- (((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+) -> M e. Met)
38 pm3.26 317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- (((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+) -> (1st` (H` p)) e. X)
39 rpre 6195 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((2nd` (H` p)) e. RR+ -> (2nd` (H` p)) e. RR)
4039adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- (((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+) -> (2nd` (H` p)) e. RR)
41 rpgt0 6199 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((2nd` (H` p)) e. RR+ -> 0 < (2nd` (H` p)))
4241adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- (((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+) -> 0 < (2nd` (H` p)))
4335, 37, 38, 40, 42syl2anc 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- (((1st` (H` p)) e. X /\ (2nd` (H` p)) e. RR+) -> (y e. ((1st`
(H` p))( ball ` M)(2nd` (H` p))) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
4434, 43syl 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ((H` p) e. (X X. RR+) -> (y e. ((1st` (H` p))( ball ` M)(2nd` (H` p))) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
4520, 22, 443syl 20 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ((H:NN-->B /\ p e. NN) -> (y e. ((1st` (H` p))( ball ` M)(2nd` (H` p))) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
4645adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ p e. NN) -> (y e. ((1st` (H` p))( ball ` M)(2nd` (H` p))) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
4746adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> (y e. ((1st` (H` p))( ball ` M)(2nd`
(H` p))) <-> (y e. X /\ ((1st`
(H` p))My) < (2nd` (H` p)))))
4847ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. ((1st` (H` p))( ball ` M)(2nd` (H` p))) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
4933, 48bitrd 531 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. (( ball ` M)` (H` p)) <-> (y e. X /\ ((1st` (H` p))My) < (2nd` (H` p)))))
5049pm3.26bda 420 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) -> y e. X)
51 pm3.27 321 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) /\ y e. X) -> y e. X)
52 lt2add 5797 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- (((((1st` (H` p))MY) e. RR /\ ((1st` (H` p))My) e. RR) /\ ((R / 2) e. RR /\ (R / 2) e. RR)) -> ((((1st` (H` p))MY) < (R / 2) /\ ((1st` (H` p))My) < (R / 2)) -> (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))))
532metcl 8021 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ((M e. Met /\ (1st` (H` p)) e. X /\ Y e. X) -> ((1st` (H` p))MY) e. RR)
5436a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- (((H:NN-->B /\ Y e. X) /\ p e. NN) -> M e. Met)
55 xp1st 11796 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ((H` p) e. (X X. RR+) -> (1st` (H` p)) e. X)
5620, 22, 553syl 20 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((H:NN-->B /\ p e. NN) -> (1st` (H` p)) e. X)
5756adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- (((H:NN-->B /\ Y e. X) /\ p e. NN) -> (1st` (H` p)) e. X)
58 simplr 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- (((H:NN-->B /\ Y e. X) /\ p e. NN) -> Y e. X)
5953, 54, 57, 58syl3anc 864 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (((H:NN-->B /\ Y e. X) /\ p e. NN) -> ((1st` (H` p))MY) e. RR)
6059adantlrr 399 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> ((1st` (H` p))MY) e. RR)
6160adantr 389 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((1st` (H` p))MY) e. RR)
622metcl 8021 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ((M e. Met /\ (1st` (H` p)) e. X /\ y e. X) -> ((1st` (H` p))My) e. RR)
6336a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (((H:NN-->B /\ p e. NN) /\ y e. X) -> M e. Met)
6456adantr 389 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (((H:NN-->B /\ p e. NN) /\ y e. X) -> (1st` (H` p)) e. X)
65 pm3.27 321 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (((H:NN-->B /\ p e. NN) /\ y e. X) -> y e. X)
6662, 63, 64, 65syl3anc 864 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- (((H:NN-->B /\ p e. NN) /\ y e. X) -> ((1st` (H` p))My) e. RR)
6766adantllr 397 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((1st` (H` p))My) e. RR)
68 rpre 6195 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ((R / 2) e. RR+ -> (R / 2) e. RR)
6917, 68syl 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (R e. RR+ -> (R / 2) e. RR)
7069ad2antll 407 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ((H:NN-->B /\ (Y e. X /\ R e. RR+)) -> (R / 2) e. RR)
7170ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (R / 2) e. RR)
7252, 61, 67, 71, 71syl2anc 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((((1st`
(H` p))MY) < (R / 2) /\ ((1st`
(H` p))My) < (R / 2)) -> (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))))
732mettri4 8024 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- (((M e. Met /\ Y e. X) /\ (y e. X /\ (1st` (H` p)) e. X)) -> (YMy) <_ (((1st` (H` p))MY) + ((1st` (H` p))My)))
7436a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> M e. Met)
75 simprl 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ((H:NN-->B /\ (Y e. X /\ R e. RR+)) -> Y e. X)
7675ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> Y e. X)
77 pm3.27 321 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> y e. X)
7864adantllr 397 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (1st` (H` p)) e. X)
7973, 74, 76, 77, 78syl2anc 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (YMy) <_ (((1st` (H` p))MY) + ((1st` (H` p))My)))
80 lelttr 5677 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- (((YMy) e. RR /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) e. RR /\ ((R / 2) + (R / 2)) e. RR) -> (((YMy) <_ (((1st` (H` p))MY) + ((1st` (H` p))My)) /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))) -> (YMy) < ((R / 2) + (R / 2))))
812metcl 8021 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 |- ((M e. Met /\ Y e. X /\ y e. X) -> (YMy) e. RR)
8236, 81mp3an1 909 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 |- ((Y e. X /\ y e. X) -> (YMy) e. RR)
8382adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 |- (((Y e. X /\ R e. RR+) /\ y e. X) -> (YMy) e. RR)
8483adantll 392 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ y e. X) -> (YMy) e. RR)
8584adantlr 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (YMy) e. RR)
86 readdcl 5456 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ((((1st`
(H` p))MY) e. RR /\ ((1st`
(H` p))My) e. RR) -> (((1st` (H` p))MY) + ((1st` (H` p))My)) e. RR)
8786, 61, 67sylanc 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (((1st` (H` p))MY) + ((1st` (H` p))My)) e. RR)
88 readdcl 5456 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 |- (((R / 2) e. RR /\ (R / 2) e. RR) -> ((R / 2) + (R / 2)) e. RR)
8988anidms 435 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 |- ((R / 2) e. RR -> ((R / 2) + (R / 2)) e. RR)
9017, 68, 893syl 20 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 |- (R e. RR+ -> ((R / 2) + (R / 2)) e. RR)
9190ad2antll 407 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ((H:NN-->B /\ (Y e. X /\ R e. RR+)) -> ((R / 2) + (R / 2)) e. RR)
9291ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((R / 2) + (R / 2)) e. RR)
9380, 85, 87, 92syl3anc 864 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> (((YMy) <_ (((1st` (H` p))MY) + ((1st` (H` p))My)) /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))) -> (YMy) < ((R / 2) + (R / 2))))
9479, 93mpand 705 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((((1st`
(H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2)) -> (YMy) < ((R / 2) + (R / 2))))
9594imp 348 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- (((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))) -> (YMy) < ((R / 2) + (R / 2)))
96 rpcn 6196 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- (R e. RR+ -> R e. CC)
97 2halves 6185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- (R e. CC -> ((R / 2) + (R / 2)) = R)
9896, 97syl 10 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- (R e. RR+ -> ((R / 2) + (R / 2)) = R)
9998adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ((Y e. X /\ R e. RR+) -> ((R / 2) + (R / 2)) = R)
10099ad2antlr 405 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> ((R / 2) + (R / 2)) = R)
101100ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- (((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))) -> ((R / 2) + (R / 2)) = R)
10295, 101breqtrd 2712 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- (((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) /\ (((1st` (H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2))) -> (YMy) < R)
103102ex 371 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((((1st`
(H` p))MY) + ((1st` (H` p))My)) < ((R / 2) + (R / 2)) -> (YMy) < R))
10472, 103syld 27 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ((((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ y e. X) -> ((((1st`
(H` p))MY) < (R / 2) /\ ((1st`
(H` p))My) < (R / 2)) -> (YMy) < R))
105104ex 371 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> (y e. X -> ((((1st`
(H` p))MY) < (R / 2) /\ ((1st`
(H` p))My) < (R / 2)) -> (YMy) < R)))
106105com23 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (((H:NN-->B /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> ((((1st` (H` p))MY) < (R / 2) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. X -> (YMy) < R)))
107106adantllr 397 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> ((((1st` (H` p))MY) < (R / 2) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. X -> (YMy) < R)))
108107imp 348 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ (((1st` (H` p))MY) < (R / 2) /\ ((1st` (H` p))My) < (R / 2))) -> (y e. X -> (YMy) < R))
109108anassrs 443 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. X -> (YMy) < R))
110109imp 348 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) /\ y e. X) -> (YMy) < R)
11151, 110jca 286 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) /\ y e. X) -> (y e. X /\ (YMy) < R))
11250, 111syldan 469 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ ((1st` (H` p))My) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) -> (y e. X /\ (YMy) < R))
113112an1rs 492 . . . . . . . . . . . . . . . . . . . . . . 23 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. X /\ (YMy) < R))
1142elbl 8048 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (((M e. Met /\ Y e. X) /\ (R e. RR /\ 0 < R)) -> (y e. (Y( ball ` M)R) <-> (y e. X /\ (YMy) < R)))
11536a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((Y e. X /\ R e. RR+) -> M e. Met)
116 pm3.26 317 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((Y e. X /\ R e. RR+) -> Y e. X)
117 rpre 6195 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (R e. RR+ -> R e. RR)
118117adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((Y e. X /\ R e. RR+) -> R e. RR)
119 rpgt0 6199 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (R e. RR+ -> 0 < R)
120119adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((Y e. X /\ R e. RR+) -> 0 < R)
121114, 115, 116, 118, 120syl2anc 475 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ((Y e. X /\ R e. RR+) -> (y e. (Y( ball ` M)R) <-> (y e. X /\ (YMy) < R)))
122121adantl 388 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) -> (y e. (Y( ball ` M)R) <-> (y e. X /\ (YMy) < R)))
123122ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st`
(H` p))MY) < (R / 2)) -> (y e. (Y( ball ` M)R) <-> (y e. X /\ (YMy) < R)))
124123ad2antrr 404 . . . . . . . . . . . . . . . . . . . . . . 23 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) /\ ((1st` (H` p))My) < (R / 2)) -> (y e. (Y( ball ` M)R) <-> (y e. X /\ (YMy) < R)))
125113, 124mpbird 194 . . . . . . . . . . . . . . . . . . . . . 22 |- (((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) /\ ((1st` (H` p))My) < (R / 2)) -> y e. (Y( ball ` M)R))
126125ex 371 . . . . . . . . . . . . . . . . . . . . 21 |- ((((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st` (H` p))MY) < (R / 2)) /\ y e. (( ball ` M)` (H` p))) -> (((1st` (H` p))My) < (R / 2) -> y e. (Y( ball ` M)R)))
127126r19.20dva 1755 . . . . . . . . . . . . . . . . . . . 20 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((1st`
(H` p))MY) < (R / 2)) -> (A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2) -> A.y e. (( ball ` M)` (H` p))y e. (Y( ball ` M)R)))
128127impr 11359 . . . . . . . . . . . . . . . . . . 19 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ (((1st` (H` p))MY) < (R / 2) /\ A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2))) -> A.y e. (( ball ` M)` (H` p))y e. (Y( ball ` M)R))
129 dfss3 2111 . . . . . . . . . . . . . . . . . . 19 |- ((( ball ` M)` (H` p)) (_ (Y( ball ` M)R) <-> A.y e. (( ball ` M)` (H` p))y e. (Y( ball ` M)R))
130128, 129sylibr 198 . . . . . . . . . . . . . . . . . 18 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ (((1st` (H` p))MY) < (R / 2) /\ A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2))) -> (( ball ` M)` (H` p)) (_ (Y( ball ` M)R))
131130ex 371 . . . . . . . . . . . . . . . . 17 |- ((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) -> ((((1st` (H` p))MY) < (R / 2) /\ A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2)) -> (( ball ` M)` (H` p)) (_ (Y( ball ` M)R)))
13219, 131sylan9r 471 . . . . . . . . . . . . . . . 16 |- (((((H:NN-->B /\ A.g e. NN (H` (g + 1)) e. ((g + 1)G(H` g))) /\ (Y e. X /\ R e. RR+)) /\ p e. NN) /\ ((j <_ p -> ((1st` (H` p))MY) < (R / 2)) /\ (l <_ p -> A.y e. (( ball ` M)` (H` p))((1st` (H` p))My) < (R / 2)))) -> ((j <_ p /\ l <_ p) -> (( ball ` M)` (H` p)) (_ (Y( ball ` M