Step | Hyp | Ref
| Expression |
1 | | lhop1.c |
. 2
β’ (π β πΆ β ((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) limβ π΄)) |
2 | | simpr 485 |
. . . . . . . 8
β’ ((π β§ π₯ β β+) β π₯ β
β+) |
3 | 2 | rphalfcld 12993 |
. . . . . . 7
β’ ((π β§ π₯ β β+) β (π₯ / 2) β
β+) |
4 | | breq2 5129 |
. . . . . . . . . 10
β’ (π = (π₯ / 2) β ((absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2))) |
5 | 4 | imbi2d 340 |
. . . . . . . . 9
β’ (π = (π₯ / 2) β (((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β ((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)))) |
6 | 5 | rexralbidv 3219 |
. . . . . . . 8
β’ (π = (π₯ / 2) β (βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)))) |
7 | 6 | rspcv 3591 |
. . . . . . 7
β’ ((π₯ / 2) β β+
β (βπ β
β+ βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)))) |
8 | 3, 7 | syl 17 |
. . . . . 6
β’ ((π β§ π₯ β β+) β
(βπ β
β+ βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)))) |
9 | | rabid 3438 |
. . . . . . . . . . . . . 14
β’ (π£ β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} β (π£ β (π΄(,)π΅) β§ (absβ(π£ β π΄)) < π)) |
10 | | eliooord 13348 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π£ β (π΄(,)π΅) β (π΄ < π£ β§ π£ < π΅)) |
11 | 10 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π΄ < π£ β§ π£ < π΅)) |
12 | 11 | simprd 496 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π£ < π΅) |
13 | 12 | biantrurd 533 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π£ < (π + π΄) β (π£ < π΅ β§ π£ < (π + π΄)))) |
14 | | ioossre 13350 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π΄(,)π΅) β β |
15 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π£ β (π΄(,)π΅)) |
16 | 14, 15 | sselid 3960 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π£ β β) |
17 | | lhop1.a |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π΄ β β) |
18 | 17 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π΄ β β) |
19 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π₯ β β+) β§ π β β+)
β π β
β+) |
20 | 19 | rpred 12981 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ π β β+)
β π β
β) |
21 | 20 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π β β) |
22 | 16, 18, 21 | ltsubaddd 11775 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((π£ β π΄) < π β π£ < (π + π΄))) |
23 | 16 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π£ β β*) |
24 | | lhop1.b |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π΅ β
β*) |
25 | 24 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π΅ β
β*) |
26 | 17 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ π₯ β β+) β§ π β β+)
β π΄ β
β) |
27 | 20, 26 | readdcld 11208 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π₯ β β+) β§ π β β+)
β (π + π΄) β
β) |
28 | 27 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ π β β+)
β (π + π΄) β
β*) |
29 | 28 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π + π΄) β
β*) |
30 | | xrltmin 13126 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π£ β β*
β§ π΅ β
β* β§ (π + π΄) β β*) β (π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π£ < π΅ β§ π£ < (π + π΄)))) |
31 | 23, 25, 29, 30 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π£ < π΅ β§ π£ < (π + π΄)))) |
32 | 13, 22, 31 | 3bitr4rd 311 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π£ β π΄) < π)) |
33 | 18 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π΄ β
β*) |
34 | 25, 29 | ifcld 4552 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β
β*) |
35 | 11 | simpld 495 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π΄ < π£) |
36 | | elioo5 13346 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β*
β§ if(π΅ β€ (π + π΄), π΅, (π + π΄)) β β* β§ π£ β β*)
β (π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (π΄ < π£ β§ π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄))))) |
37 | 36 | baibd 540 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π΄ β β*
β§ if(π΅ β€ (π + π΄), π΅, (π + π΄)) β β* β§ π£ β β*)
β§ π΄ < π£) β (π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
38 | 33, 34, 23, 35, 37 | syl31anc 1373 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β π£ < if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
39 | 18, 16, 35 | ltled 11327 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β π΄ β€ π£) |
40 | 18, 16, 39 | abssubge0d 15343 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (absβ(π£ β π΄)) = (π£ β π΄)) |
41 | 40 | breq1d 5135 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((absβ(π£ β π΄)) < π β (π£ β π΄) < π)) |
42 | 32, 38, 41 | 3bitr4d 310 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (absβ(π£ β π΄)) < π)) |
43 | 42 | rabbi2dva 4197 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β β+) β§ π β β+)
β ((π΄(,)π΅) β© (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) = {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π}) |
44 | 24 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β β+) β§ π β β+)
β π΅ β
β*) |
45 | | xrmin1 13121 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π΅ β β*
β§ (π + π΄) β β*)
β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ π΅) |
46 | 44, 28, 45 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β β+) β§ π β β+)
β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ π΅) |
47 | | iooss2 13325 |
. . . . . . . . . . . . . . . . . 18
β’ ((π΅ β β*
β§ if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ π΅) β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (π΄(,)π΅)) |
48 | 44, 46, 47 | syl2anc 584 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π₯ β β+) β§ π β β+)
β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (π΄(,)π΅)) |
49 | | sseqin2 4195 |
. . . . . . . . . . . . . . . . 17
β’ ((π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (π΄(,)π΅) β ((π΄(,)π΅) β© (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) = (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
50 | 48, 49 | sylib 217 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β β+) β§ π β β+)
β ((π΄(,)π΅) β© (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) = (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
51 | 43, 50 | eqtr3d 2773 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β β+) β§ π β β+)
β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} = (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
52 | 51 | eleq2d 2818 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β β+) β§ π β β+)
β (π£ β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} β π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) |
53 | 9, 52 | bitr3id 284 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β β+) β§ π β β+)
β ((π£ β (π΄(,)π΅) β§ (absβ(π£ β π΄)) < π) β π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) |
54 | | lbioo 13320 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ Β¬
π΄ β (π΄(,)π΅) |
55 | | eleq1 2820 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π¦ = π΄ β (π¦ β (π΄(,)π΅) β π΄ β (π΄(,)π΅))) |
56 | 54, 55 | mtbiri 326 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ = π΄ β Β¬ π¦ β (π΄(,)π΅)) |
57 | 56 | necon2ai 2969 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ β (π΄(,)π΅) β π¦ β π΄) |
58 | 57 | biantrurd 533 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β (π΄(,)π΅) β ((absβ(π¦ β π΄)) < π β (π¦ β π΄ β§ (absβ(π¦ β π΄)) < π))) |
59 | 58 | bicomd 222 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (π΄(,)π΅) β ((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(π¦ β π΄)) < π)) |
60 | | fveq2 6862 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π§ = π¦ β ((β D πΉ)βπ§) = ((β D πΉ)βπ¦)) |
61 | | fveq2 6862 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π§ = π¦ β ((β D πΊ)βπ§) = ((β D πΊ)βπ¦)) |
62 | 60, 61 | oveq12d 7395 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π§ = π¦ β (((β D πΉ)βπ§) / ((β D πΊ)βπ§)) = (((β D πΉ)βπ¦) / ((β D πΊ)βπ¦))) |
63 | | eqid 2731 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) = (π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) |
64 | | ovex 7410 |
. . . . . . . . . . . . . . . . . . . . 21
β’
(((β D πΉ)βπ§) / ((β D πΊ)βπ§)) β V |
65 | 62, 63, 64 | fvmpt3i 6973 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ β (π΄(,)π΅) β ((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) = (((β D πΉ)βπ¦) / ((β D πΊ)βπ¦))) |
66 | 65 | fvoveq1d 7399 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β (π΄(,)π΅) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) = (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ))) |
67 | 66 | breq1d 5135 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (π΄(,)π΅) β ((absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2) β (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) |
68 | 59, 67 | imbi12d 344 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ β (π΄(,)π΅) β (((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β ((absβ(π¦ β π΄)) < π β (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2)))) |
69 | 68 | ralbiia 3090 |
. . . . . . . . . . . . . . . 16
β’
(βπ¦ β
(π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β βπ¦ β (π΄(,)π΅)((absβ(π¦ β π΄)) < π β (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) |
70 | | fvoveq1 7400 |
. . . . . . . . . . . . . . . . . 18
β’ (π£ = π¦ β (absβ(π£ β π΄)) = (absβ(π¦ β π΄))) |
71 | 70 | breq1d 5135 |
. . . . . . . . . . . . . . . . 17
β’ (π£ = π¦ β ((absβ(π£ β π΄)) < π β (absβ(π¦ β π΄)) < π)) |
72 | 71 | ralrab 3669 |
. . . . . . . . . . . . . . . 16
β’
(βπ¦ β
{π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2) β βπ¦ β (π΄(,)π΅)((absβ(π¦ β π΄)) < π β (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) |
73 | 69, 72 | bitr4i 277 |
. . . . . . . . . . . . . . 15
β’
(βπ¦ β
(π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β βπ¦ β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2)) |
74 | 51 | adantrr 715 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π₯ β β+) β§ (π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} = (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
75 | 74 | raleqdv 3324 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β β+) β§ (π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) β (βπ¦ β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2) β βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) |
76 | 17 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΄ β β) |
77 | 24 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΅ β
β*) |
78 | | lhop1.l |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β π΄ < π΅) |
79 | 78 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΄ < π΅) |
80 | | lhop1.f |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β πΉ:(π΄(,)π΅)βΆβ) |
81 | 80 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β πΉ:(π΄(,)π΅)βΆβ) |
82 | | lhop1.g |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β πΊ:(π΄(,)π΅)βΆβ) |
83 | 82 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β πΊ:(π΄(,)π΅)βΆβ) |
84 | | lhop1.if |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β dom (β D πΉ) = (π΄(,)π΅)) |
85 | 84 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β dom (β D πΉ) = (π΄(,)π΅)) |
86 | | lhop1.ig |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β dom (β D πΊ) = (π΄(,)π΅)) |
87 | 86 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β dom (β D πΊ) = (π΄(,)π΅)) |
88 | | lhop1.f0 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β 0 β (πΉ limβ π΄)) |
89 | 88 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β 0 β (πΉ limβ π΄)) |
90 | | lhop1.g0 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β 0 β (πΊ limβ π΄)) |
91 | 90 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β 0 β (πΊ limβ π΄)) |
92 | | lhop1.gn0 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β Β¬ 0 β ran πΊ) |
93 | 92 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β Β¬ 0 β ran πΊ) |
94 | | lhop1.gd0 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β Β¬ 0 β ran
(β D πΊ)) |
95 | 94 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β Β¬ 0 β ran (β D
πΊ)) |
96 | 1 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β πΆ β ((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) limβ π΄)) |
97 | 3 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (π₯ / 2) β
β+) |
98 | 76 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΄ β
β*) |
99 | | simprll 777 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π β β+) |
100 | 99 | rpred 12981 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π β β) |
101 | 100, 76 | readdcld 11208 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (π + π΄) β β) |
102 | | iocssre 13369 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β*
β§ (π + π΄) β β) β (π΄(,](π + π΄)) β β) |
103 | 98, 101, 102 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (π΄(,](π + π΄)) β β) |
104 | 77 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β§ π΅ β€ (π + π΄)) β π΅ β
β*) |
105 | 100 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β§ Β¬ π΅ β€ (π + π΄)) β π β β) |
106 | 76 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β§ Β¬ π΅ β€ (π + π΄)) β π΄ β β) |
107 | 105, 106 | readdcld 11208 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β§ Β¬ π΅ β€ (π + π΄)) β (π + π΄) β β) |
108 | 107 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β§ Β¬ π΅ β€ (π + π΄)) β (π + π΄) β
β*) |
109 | 104, 108 | ifclda 4541 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β
β*) |
110 | 76, 99 | ltaddrp2d 13015 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΄ < (π + π΄)) |
111 | 101 | rexrd 11229 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (π + π΄) β
β*) |
112 | | xrltmin 13126 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π΄ β β*
β§ π΅ β
β* β§ (π + π΄) β β*) β (π΄ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π΄ < π΅ β§ π΄ < (π + π΄)))) |
113 | 98, 77, 111, 112 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (π΄ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π΄ < π΅ β§ π΄ < (π + π΄)))) |
114 | 79, 110, 113 | mpbir2and 711 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π΄ < if(π΅ β€ (π + π΄), π΅, (π + π΄))) |
115 | | xrmin2 13122 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΅ β β*
β§ (π + π΄) β β*)
β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ (π + π΄)) |
116 | 77, 111, 115 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ (π + π΄)) |
117 | | elioc1 13331 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β*
β§ (π + π΄) β β*)
β (if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π΄(,](π + π΄)) β (if(π΅ β€ (π + π΄), π΅, (π + π΄)) β β* β§ π΄ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β§ if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ (π + π΄)))) |
118 | 98, 111, 117 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π΄(,](π + π΄)) β (if(π΅ β€ (π + π΄), π΅, (π + π΄)) β β* β§ π΄ < if(π΅ β€ (π + π΄), π΅, (π + π΄)) β§ if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ (π + π΄)))) |
119 | 109, 114,
116, 118 | mpbir3and 1342 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β (π΄(,](π + π΄))) |
120 | 103, 119 | sseldd 3963 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β β) |
121 | 77, 111, 45 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β if(π΅ β€ (π + π΄), π΅, (π + π΄)) β€ π΅) |
122 | | simprlr 778 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) |
123 | | simprr 771 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2)) |
124 | | eqid 2731 |
. . . . . . . . . . . . . . . . . . 19
β’ (π΄ + (π / 2)) = (π΄ + (π / 2)) |
125 | 76, 77, 79, 81, 83, 85, 87, 89, 91, 93, 95, 96, 97, 120, 121, 122, 123, 124 | lhop1lem 25429 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < (2 Β· (π₯ / 2))) |
126 | 2 | rpcnd 12983 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β β+) β π₯ β
β) |
127 | | 2cnd 12255 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β β+) β 2 β
β) |
128 | | 2ne0 12281 |
. . . . . . . . . . . . . . . . . . . . 21
β’ 2 β
0 |
129 | 128 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β β+) β 2 β
0) |
130 | 126, 127,
129 | divcan2d 11957 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π₯ β β+) β (2
Β· (π₯ / 2)) = π₯) |
131 | 130 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (2 Β· (π₯ / 2)) = π₯) |
132 | 125, 131 | breqtrd 5151 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π₯ β β+) β§ ((π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))) β§ βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2))) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯) |
133 | 132 | expr 457 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β β+) β§ (π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) β (βπ¦ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄)))(absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯)) |
134 | 75, 133 | sylbid 239 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β β+) β§ (π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) β (βπ¦ β {π£ β (π΄(,)π΅) β£ (absβ(π£ β π΄)) < π} (absβ((((β D πΉ)βπ¦) / ((β D πΊ)βπ¦)) β πΆ)) < (π₯ / 2) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯)) |
135 | 73, 134 | biimtrid 241 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β β+) β§ (π β β+
β§ π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))))) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯)) |
136 | 135 | expr 457 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β β+) β§ π β β+)
β (π£ β (π΄(,)if(π΅ β€ (π + π΄), π΅, (π + π΄))) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯))) |
137 | 53, 136 | sylbid 239 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β β+) β§ π β β+)
β ((π£ β (π΄(,)π΅) β§ (absβ(π£ β π΄)) < π) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯))) |
138 | 137 | expdimp 453 |
. . . . . . . . . . 11
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((absβ(π£ β π΄)) < π β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯))) |
139 | | fveq2 6862 |
. . . . . . . . . . . . . . . . 17
β’ (π§ = π£ β (πΉβπ§) = (πΉβπ£)) |
140 | | fveq2 6862 |
. . . . . . . . . . . . . . . . 17
β’ (π§ = π£ β (πΊβπ§) = (πΊβπ£)) |
141 | 139, 140 | oveq12d 7395 |
. . . . . . . . . . . . . . . 16
β’ (π§ = π£ β ((πΉβπ§) / (πΊβπ§)) = ((πΉβπ£) / (πΊβπ£))) |
142 | | eqid 2731 |
. . . . . . . . . . . . . . . 16
β’ (π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))) = (π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))) |
143 | | ovex 7410 |
. . . . . . . . . . . . . . . 16
β’ ((πΉβπ§) / (πΊβπ§)) β V |
144 | 141, 142,
143 | fvmpt3i 6973 |
. . . . . . . . . . . . . . 15
β’ (π£ β (π΄(,)π΅) β ((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) = ((πΉβπ£) / (πΊβπ£))) |
145 | 144 | fvoveq1d 7399 |
. . . . . . . . . . . . . 14
β’ (π£ β (π΄(,)π΅) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) = (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ))) |
146 | 145 | breq1d 5135 |
. . . . . . . . . . . . 13
β’ (π£ β (π΄(,)π΅) β ((absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯ β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯)) |
147 | 146 | imbi2d 340 |
. . . . . . . . . . . 12
β’ (π£ β (π΄(,)π΅) β ((βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯))) |
148 | 147 | adantl 482 |
. . . . . . . . . . 11
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((πΉβπ£) / (πΊβπ£)) β πΆ)) < π₯))) |
149 | 138, 148 | sylibrd 258 |
. . . . . . . . . 10
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((absβ(π£ β π΄)) < π β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
150 | 149 | adantld 491 |
. . . . . . . . 9
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β ((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
151 | 150 | com23 86 |
. . . . . . . 8
β’ ((((π β§ π₯ β β+) β§ π β β+)
β§ π£ β (π΄(,)π΅)) β (βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β ((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
152 | 151 | ralrimdva 3153 |
. . . . . . 7
β’ (((π β§ π₯ β β+) β§ π β β+)
β (βπ¦ β
(π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
153 | 152 | reximdva 3167 |
. . . . . 6
β’ ((π β§ π₯ β β+) β
(βπ β
β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < (π₯ / 2)) β βπ β β+ βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
154 | 8, 153 | syld 47 |
. . . . 5
β’ ((π β§ π₯ β β+) β
(βπ β
β+ βπ β β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β βπ β β+ βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
155 | 154 | ralrimdva 3153 |
. . . 4
β’ (π β (βπ β β+
βπ β
β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π) β βπ₯ β β+ βπ β β+
βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯))) |
156 | 155 | anim2d 612 |
. . 3
β’ (π β ((πΆ β β β§ βπ β β+
βπ β
β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π)) β (πΆ β β β§ βπ₯ β β+
βπ β
β+ βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯)))) |
157 | | dvf 25323 |
. . . . . . . 8
β’ (β
D πΉ):dom (β D πΉ)βΆβ |
158 | 84 | feq2d 6674 |
. . . . . . . 8
β’ (π β ((β D πΉ):dom (β D πΉ)βΆβ β (β
D πΉ):(π΄(,)π΅)βΆβ)) |
159 | 157, 158 | mpbii 232 |
. . . . . . 7
β’ (π β (β D πΉ):(π΄(,)π΅)βΆβ) |
160 | 159 | ffvelcdmda 7055 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β ((β D πΉ)βπ§) β β) |
161 | | dvf 25323 |
. . . . . . . 8
β’ (β
D πΊ):dom (β D πΊ)βΆβ |
162 | 86 | feq2d 6674 |
. . . . . . . 8
β’ (π β ((β D πΊ):dom (β D πΊ)βΆβ β (β
D πΊ):(π΄(,)π΅)βΆβ)) |
163 | 161, 162 | mpbii 232 |
. . . . . . 7
β’ (π β (β D πΊ):(π΄(,)π΅)βΆβ) |
164 | 163 | ffvelcdmda 7055 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β ((β D πΊ)βπ§) β β) |
165 | 94 | adantr 481 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β Β¬ 0 β ran (β D
πΊ)) |
166 | 163 | ffnd 6689 |
. . . . . . . . . 10
β’ (π β (β D πΊ) Fn (π΄(,)π΅)) |
167 | | fnfvelrn 7051 |
. . . . . . . . . 10
β’
(((β D πΊ) Fn
(π΄(,)π΅) β§ π§ β (π΄(,)π΅)) β ((β D πΊ)βπ§) β ran (β D πΊ)) |
168 | 166, 167 | sylan 580 |
. . . . . . . . 9
β’ ((π β§ π§ β (π΄(,)π΅)) β ((β D πΊ)βπ§) β ran (β D πΊ)) |
169 | | eleq1 2820 |
. . . . . . . . 9
β’
(((β D πΊ)βπ§) = 0 β (((β D πΊ)βπ§) β ran (β D πΊ) β 0 β ran (β D πΊ))) |
170 | 168, 169 | syl5ibcom 244 |
. . . . . . . 8
β’ ((π β§ π§ β (π΄(,)π΅)) β (((β D πΊ)βπ§) = 0 β 0 β ran (β D πΊ))) |
171 | 170 | necon3bd 2953 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β (Β¬ 0 β ran (β D
πΊ) β ((β D πΊ)βπ§) β 0)) |
172 | 165, 171 | mpd 15 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β ((β D πΊ)βπ§) β 0) |
173 | 160, 164,
172 | divcld 11955 |
. . . . 5
β’ ((π β§ π§ β (π΄(,)π΅)) β (((β D πΉ)βπ§) / ((β D πΊ)βπ§)) β β) |
174 | 173 | fmpttd 7083 |
. . . 4
β’ (π β (π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))):(π΄(,)π΅)βΆβ) |
175 | | ax-resscn 11132 |
. . . . . 6
β’ β
β β |
176 | 14, 175 | sstri 3971 |
. . . . 5
β’ (π΄(,)π΅) β β |
177 | 176 | a1i 11 |
. . . 4
β’ (π β (π΄(,)π΅) β β) |
178 | 17 | recnd 11207 |
. . . 4
β’ (π β π΄ β β) |
179 | 174, 177,
178 | ellimc3 25295 |
. . 3
β’ (π β (πΆ β ((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) limβ π΄) β (πΆ β β β§ βπ β β+
βπ β
β+ βπ¦ β (π΄(,)π΅)((π¦ β π΄ β§ (absβ(π¦ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§)))βπ¦) β πΆ)) < π)))) |
180 | 80 | ffvelcdmda 7055 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΉβπ§) β β) |
181 | 180 | recnd 11207 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΉβπ§) β β) |
182 | 82 | ffvelcdmda 7055 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΊβπ§) β β) |
183 | 182 | recnd 11207 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΊβπ§) β β) |
184 | 92 | adantr 481 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β Β¬ 0 β ran πΊ) |
185 | 82 | ffnd 6689 |
. . . . . . . . . 10
β’ (π β πΊ Fn (π΄(,)π΅)) |
186 | | fnfvelrn 7051 |
. . . . . . . . . 10
β’ ((πΊ Fn (π΄(,)π΅) β§ π§ β (π΄(,)π΅)) β (πΊβπ§) β ran πΊ) |
187 | 185, 186 | sylan 580 |
. . . . . . . . 9
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΊβπ§) β ran πΊ) |
188 | | eleq1 2820 |
. . . . . . . . 9
β’ ((πΊβπ§) = 0 β ((πΊβπ§) β ran πΊ β 0 β ran πΊ)) |
189 | 187, 188 | syl5ibcom 244 |
. . . . . . . 8
β’ ((π β§ π§ β (π΄(,)π΅)) β ((πΊβπ§) = 0 β 0 β ran πΊ)) |
190 | 189 | necon3bd 2953 |
. . . . . . 7
β’ ((π β§ π§ β (π΄(,)π΅)) β (Β¬ 0 β ran πΊ β (πΊβπ§) β 0)) |
191 | 184, 190 | mpd 15 |
. . . . . 6
β’ ((π β§ π§ β (π΄(,)π΅)) β (πΊβπ§) β 0) |
192 | 181, 183,
191 | divcld 11955 |
. . . . 5
β’ ((π β§ π§ β (π΄(,)π΅)) β ((πΉβπ§) / (πΊβπ§)) β β) |
193 | 192 | fmpttd 7083 |
. . . 4
β’ (π β (π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))):(π΄(,)π΅)βΆβ) |
194 | 193, 177,
178 | ellimc3 25295 |
. . 3
β’ (π β (πΆ β ((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))) limβ π΄) β (πΆ β β β§ βπ₯ β β+
βπ β
β+ βπ£ β (π΄(,)π΅)((π£ β π΄ β§ (absβ(π£ β π΄)) < π) β (absβ(((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§)))βπ£) β πΆ)) < π₯)))) |
195 | 156, 179,
194 | 3imtr4d 293 |
. 2
β’ (π β (πΆ β ((π§ β (π΄(,)π΅) β¦ (((β D πΉ)βπ§) / ((β D πΊ)βπ§))) limβ π΄) β πΆ β ((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))) limβ π΄))) |
196 | 1, 195 | mpd 15 |
1
β’ (π β πΆ β ((π§ β (π΄(,)π΅) β¦ ((πΉβπ§) / (πΊβπ§))) limβ π΄)) |