Metamath Proof Explorer


Theorem blss

Description: Any point P in a ball B can be centered in another ball that is a subset of B . (Contributed by NM, 31-Aug-2006) (Revised by Mario Carneiro, 24-Aug-2015)

Ref Expression
Assertion blss D∞MetXBranballDPBx+PballDxB

Proof

Step Hyp Ref Expression
1 blrn D∞MetXBranballDyXr*B=yballDr
2 elbl D∞MetXyXr*PyballDrPXyDP<r
3 simpl1 D∞MetXyXr*PXD∞MetX
4 simpl2 D∞MetXyXr*PXyX
5 simpr D∞MetXyXr*PXPX
6 xmetcl D∞MetXyXPXyDP*
7 3 4 5 6 syl3anc D∞MetXyXr*PXyDP*
8 simpl3 D∞MetXyXr*PXr*
9 qbtwnxr yDP*r*yDP<rzyDP<zz<r
10 9 3expia yDP*r*yDP<rzyDP<zz<r
11 7 8 10 syl2anc D∞MetXyXr*PXyDP<rzyDP<zz<r
12 qre zz
13 simpll1 D∞MetXyXr*PXzyDP<zz<rD∞MetX
14 simplr D∞MetXyXr*PXzyDP<zz<rPX
15 simpll2 D∞MetXyXr*PXzyDP<zz<ryX
16 xmetsym D∞MetXPXyXPDy=yDP
17 13 14 15 16 syl3anc D∞MetXyXr*PXzyDP<zz<rPDy=yDP
18 simprrl D∞MetXyXr*PXzyDP<zz<ryDP<z
19 17 18 eqbrtrd D∞MetXyXr*PXzyDP<zz<rPDy<z
20 simprl D∞MetXyXr*PXzyDP<zz<rz
21 xmetcl D∞MetXPXyXPDy*
22 13 14 15 21 syl3anc D∞MetXyXr*PXzyDP<zz<rPDy*
23 rexr zz*
24 23 ad2antrl D∞MetXyXr*PXzyDP<zz<rz*
25 22 24 19 xrltled D∞MetXyXr*PXzyDP<zz<rPDyz
26 xmetlecl D∞MetXPXyXzPDyzPDy
27 13 14 15 20 25 26 syl122anc D∞MetXyXr*PXzyDP<zz<rPDy
28 difrp PDyzPDy<zzPDy+
29 27 20 28 syl2anc D∞MetXyXr*PXzyDP<zz<rPDy<zzPDy+
30 19 29 mpbid D∞MetXyXr*PXzyDP<zz<rzPDy+
31 20 27 resubcld D∞MetXyXr*PXzyDP<zz<rzPDy
32 22 xrleidd D∞MetXyXr*PXzyDP<zz<rPDyPDy
33 20 recnd D∞MetXyXr*PXzyDP<zz<rz
34 27 recnd D∞MetXyXr*PXzyDP<zz<rPDy
35 33 34 nncand D∞MetXyXr*PXzyDP<zz<rzzPDy=PDy
36 32 35 breqtrrd D∞MetXyXr*PXzyDP<zz<rPDyzzPDy
37 blss2 D∞MetXPXyXzPDyzPDyzzPDyPballDzPDyyballDz
38 13 14 15 31 20 36 37 syl33anc D∞MetXyXr*PXzyDP<zz<rPballDzPDyyballDz
39 simpll3 D∞MetXyXr*PXzyDP<zz<rr*
40 simprrr D∞MetXyXr*PXzyDP<zz<rz<r
41 24 39 40 xrltled D∞MetXyXr*PXzyDP<zz<rzr
42 ssbl D∞MetXyXz*r*zryballDzyballDr
43 13 15 24 39 41 42 syl221anc D∞MetXyXr*PXzyDP<zz<ryballDzyballDr
44 38 43 sstrd D∞MetXyXr*PXzyDP<zz<rPballDzPDyyballDr
45 oveq2 x=zPDyPballDx=PballDzPDy
46 45 sseq1d x=zPDyPballDxyballDrPballDzPDyyballDr
47 46 rspcev zPDy+PballDzPDyyballDrx+PballDxyballDr
48 30 44 47 syl2anc D∞MetXyXr*PXzyDP<zz<rx+PballDxyballDr
49 48 expr D∞MetXyXr*PXzyDP<zz<rx+PballDxyballDr
50 12 49 sylan2 D∞MetXyXr*PXzyDP<zz<rx+PballDxyballDr
51 50 rexlimdva D∞MetXyXr*PXzyDP<zz<rx+PballDxyballDr
52 11 51 syld D∞MetXyXr*PXyDP<rx+PballDxyballDr
53 52 expimpd D∞MetXyXr*PXyDP<rx+PballDxyballDr
54 2 53 sylbid D∞MetXyXr*PyballDrx+PballDxyballDr
55 eleq2 B=yballDrPBPyballDr
56 sseq2 B=yballDrPballDxBPballDxyballDr
57 56 rexbidv B=yballDrx+PballDxBx+PballDxyballDr
58 55 57 imbi12d B=yballDrPBx+PballDxBPyballDrx+PballDxyballDr
59 54 58 syl5ibrcom D∞MetXyXr*B=yballDrPBx+PballDxB
60 59 3expib D∞MetXyXr*B=yballDrPBx+PballDxB
61 60 rexlimdvv D∞MetXyXr*B=yballDrPBx+PballDxB
62 1 61 sylbid D∞MetXBranballDPBx+PballDxB
63 62 3imp D∞MetXBranballDPBx+PballDxB