Step | Hyp | Ref
| Expression |
1 | | blcld.3 |
. 2
β’ π = {π§ β π β£ (ππ·π§) β€ π
} |
2 | | simplr3 1041 |
. . . . . 6
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β π
< π) |
3 | | xmetcl 13937 |
. . . . . . . . 9
β’ ((π· β (βMetβπ) β§ π β π β§ π§ β π) β (ππ·π§) β
β*) |
4 | 3 | 3expa 1203 |
. . . . . . . 8
β’ (((π· β (βMetβπ) β§ π β π) β§ π§ β π) β (ππ·π§) β
β*) |
5 | 4 | adantlr 477 |
. . . . . . 7
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β (ππ·π§) β
β*) |
6 | | simplr1 1039 |
. . . . . . 7
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β π
β
β*) |
7 | | simplr2 1040 |
. . . . . . 7
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β π β
β*) |
8 | | xrlelttr 9808 |
. . . . . . . 8
β’ (((ππ·π§) β β* β§ π
β β*
β§ π β
β*) β (((ππ·π§) β€ π
β§ π
< π) β (ππ·π§) < π)) |
9 | 8 | expcomd 1441 |
. . . . . . 7
β’ (((ππ·π§) β β* β§ π
β β*
β§ π β
β*) β (π
< π β ((ππ·π§) β€ π
β (ππ·π§) < π))) |
10 | 5, 6, 7, 9 | syl3anc 1238 |
. . . . . 6
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β (π
< π β ((ππ·π§) β€ π
β (ππ·π§) < π))) |
11 | 2, 10 | mpd 13 |
. . . . 5
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β ((ππ·π§) β€ π
β (ππ·π§) < π)) |
12 | | simp2 998 |
. . . . . . 7
β’ ((π
β β*
β§ π β
β* β§ π
< π) β π β
β*) |
13 | | elbl2 13978 |
. . . . . . . 8
β’ (((π· β (βMetβπ) β§ π β β*) β§ (π β π β§ π§ β π)) β (π§ β (π(ballβπ·)π) β (ππ·π§) < π)) |
14 | 13 | an4s 588 |
. . . . . . 7
β’ (((π· β (βMetβπ) β§ π β π) β§ (π β β* β§ π§ β π)) β (π§ β (π(ballβπ·)π) β (ππ·π§) < π)) |
15 | 12, 14 | sylanr1 404 |
. . . . . 6
β’ (((π· β (βMetβπ) β§ π β π) β§ ((π
β β* β§ π β β*
β§ π
< π) β§ π§ β π)) β (π§ β (π(ballβπ·)π) β (ππ·π§) < π)) |
16 | 15 | anassrs 400 |
. . . . 5
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β (π§ β (π(ballβπ·)π) β (ππ·π§) < π)) |
17 | 11, 16 | sylibrd 169 |
. . . 4
β’ ((((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β§ π§ β π) β ((ππ·π§) β€ π
β π§ β (π(ballβπ·)π))) |
18 | 17 | ralrimiva 2550 |
. . 3
β’ (((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β βπ§ β π ((ππ·π§) β€ π
β π§ β (π(ballβπ·)π))) |
19 | | rabss 3234 |
. . 3
β’ ({π§ β π β£ (ππ·π§) β€ π
} β (π(ballβπ·)π) β βπ§ β π ((ππ·π§) β€ π
β π§ β (π(ballβπ·)π))) |
20 | 18, 19 | sylibr 134 |
. 2
β’ (((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β {π§ β π β£ (ππ·π§) β€ π
} β (π(ballβπ·)π)) |
21 | 1, 20 | eqsstrid 3203 |
1
β’ (((π· β (βMetβπ) β§ π β π) β§ (π
β β* β§ π β β*
β§ π
< π)) β π β (π(ballβπ·)π)) |