Step | Hyp | Ref
| Expression |
1 | | itg2mono.3 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β (πΉβπ):ββΆ(0[,)+β)) |
2 | | rge0ssre 13430 |
. . . . . . . . . . . 12
β’
(0[,)+β) β β |
3 | | fss 6732 |
. . . . . . . . . . . 12
β’ (((πΉβπ):ββΆ(0[,)+β) β§
(0[,)+β) β β) β (πΉβπ):ββΆβ) |
4 | 1, 2, 3 | sylancl 587 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (πΉβπ):ββΆβ) |
5 | 4 | ffvelcdmda 7084 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π₯ β β) β ((πΉβπ)βπ₯) β β) |
6 | 5 | an32s 651 |
. . . . . . . . 9
β’ (((π β§ π₯ β β) β§ π β β) β ((πΉβπ)βπ₯) β β) |
7 | 6 | fmpttd 7112 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β (π β β β¦ ((πΉβπ)βπ₯)):ββΆβ) |
8 | 7 | frnd 6723 |
. . . . . . 7
β’ ((π β§ π₯ β β) β ran (π β β β¦ ((πΉβπ)βπ₯)) β β) |
9 | | 1nn 12220 |
. . . . . . . . . 10
β’ 1 β
β |
10 | | eqid 2733 |
. . . . . . . . . . 11
β’ (π β β β¦ ((πΉβπ)βπ₯)) = (π β β β¦ ((πΉβπ)βπ₯)) |
11 | 10, 6 | dmmptd 6693 |
. . . . . . . . . 10
β’ ((π β§ π₯ β β) β dom (π β β β¦ ((πΉβπ)βπ₯)) = β) |
12 | 9, 11 | eleqtrrid 2841 |
. . . . . . . . 9
β’ ((π β§ π₯ β β) β 1 β dom (π β β β¦ ((πΉβπ)βπ₯))) |
13 | 12 | ne0d 4335 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β dom (π β β β¦ ((πΉβπ)βπ₯)) β β
) |
14 | | dm0rn0 5923 |
. . . . . . . . 9
β’ (dom
(π β β β¦
((πΉβπ)βπ₯)) = β
β ran (π β β β¦ ((πΉβπ)βπ₯)) = β
) |
15 | 14 | necon3bii 2994 |
. . . . . . . 8
β’ (dom
(π β β β¦
((πΉβπ)βπ₯)) β β
β ran (π β β β¦ ((πΉβπ)βπ₯)) β β
) |
16 | 13, 15 | sylib 217 |
. . . . . . 7
β’ ((π β§ π₯ β β) β ran (π β β β¦ ((πΉβπ)βπ₯)) β β
) |
17 | | itg2mono.5 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β βπ¦ β β βπ β β ((πΉβπ)βπ₯) β€ π¦) |
18 | 7 | ffnd 6716 |
. . . . . . . . . . 11
β’ ((π β§ π₯ β β) β (π β β β¦ ((πΉβπ)βπ₯)) Fn β) |
19 | | breq1 5151 |
. . . . . . . . . . . 12
β’ (π§ = ((π β β β¦ ((πΉβπ)βπ₯))βπ) β (π§ β€ π¦ β ((π β β β¦ ((πΉβπ)βπ₯))βπ) β€ π¦)) |
20 | 19 | ralrn 7087 |
. . . . . . . . . . 11
β’ ((π β β β¦ ((πΉβπ)βπ₯)) Fn β β (βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦ β βπ β β ((π β β β¦ ((πΉβπ)βπ₯))βπ) β€ π¦)) |
21 | 18, 20 | syl 17 |
. . . . . . . . . 10
β’ ((π β§ π₯ β β) β (βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦ β βπ β β ((π β β β¦ ((πΉβπ)βπ₯))βπ) β€ π¦)) |
22 | | fveq2 6889 |
. . . . . . . . . . . . . . 15
β’ (π = π β (πΉβπ) = (πΉβπ)) |
23 | 22 | fveq1d 6891 |
. . . . . . . . . . . . . 14
β’ (π = π β ((πΉβπ)βπ₯) = ((πΉβπ)βπ₯)) |
24 | | fvex 6902 |
. . . . . . . . . . . . . 14
β’ ((πΉβπ)βπ₯) β V |
25 | 23, 10, 24 | fvmpt 6996 |
. . . . . . . . . . . . 13
β’ (π β β β ((π β β β¦ ((πΉβπ)βπ₯))βπ) = ((πΉβπ)βπ₯)) |
26 | 25 | breq1d 5158 |
. . . . . . . . . . . 12
β’ (π β β β (((π β β β¦ ((πΉβπ)βπ₯))βπ) β€ π¦ β ((πΉβπ)βπ₯) β€ π¦)) |
27 | 26 | ralbiia 3092 |
. . . . . . . . . . 11
β’
(βπ β
β ((π β β
β¦ ((πΉβπ)βπ₯))βπ) β€ π¦ β βπ β β ((πΉβπ)βπ₯) β€ π¦) |
28 | 23 | breq1d 5158 |
. . . . . . . . . . . 12
β’ (π = π β (((πΉβπ)βπ₯) β€ π¦ β ((πΉβπ)βπ₯) β€ π¦)) |
29 | 28 | cbvralvw 3235 |
. . . . . . . . . . 11
β’
(βπ β
β ((πΉβπ)βπ₯) β€ π¦ β βπ β β ((πΉβπ)βπ₯) β€ π¦) |
30 | 27, 29 | bitr4i 278 |
. . . . . . . . . 10
β’
(βπ β
β ((π β β
β¦ ((πΉβπ)βπ₯))βπ) β€ π¦ β βπ β β ((πΉβπ)βπ₯) β€ π¦) |
31 | 21, 30 | bitrdi 287 |
. . . . . . . . 9
β’ ((π β§ π₯ β β) β (βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦ β βπ β β ((πΉβπ)βπ₯) β€ π¦)) |
32 | 31 | rexbidv 3179 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β (βπ¦ β β βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦ β βπ¦ β β βπ β β ((πΉβπ)βπ₯) β€ π¦)) |
33 | 17, 32 | mpbird 257 |
. . . . . . 7
β’ ((π β§ π₯ β β) β βπ¦ β β βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦) |
34 | 8, 16, 33 | suprcld 12174 |
. . . . . 6
β’ ((π β§ π₯ β β) β sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < ) β
β) |
35 | 34 | rexrd 11261 |
. . . . 5
β’ ((π β§ π₯ β β) β sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < ) β
β*) |
36 | | 0red 11214 |
. . . . . 6
β’ ((π β§ π₯ β β) β 0 β
β) |
37 | | fveq2 6889 |
. . . . . . . . . . 11
β’ (π = 1 β (πΉβπ) = (πΉβ1)) |
38 | 37 | feq1d 6700 |
. . . . . . . . . 10
β’ (π = 1 β ((πΉβπ):ββΆ(0[,)+β) β (πΉβ1):ββΆ(0[,)+β))) |
39 | 1 | ralrimiva 3147 |
. . . . . . . . . 10
β’ (π β βπ β β (πΉβπ):ββΆ(0[,)+β)) |
40 | 9 | a1i 11 |
. . . . . . . . . 10
β’ (π β 1 β
β) |
41 | 38, 39, 40 | rspcdva 3614 |
. . . . . . . . 9
β’ (π β (πΉβ1):ββΆ(0[,)+β)) |
42 | 41 | ffvelcdmda 7084 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β ((πΉβ1)βπ₯) β (0[,)+β)) |
43 | | elrege0 13428 |
. . . . . . . 8
β’ (((πΉβ1)βπ₯) β (0[,)+β) β
(((πΉβ1)βπ₯) β β β§ 0 β€
((πΉβ1)βπ₯))) |
44 | 42, 43 | sylib 217 |
. . . . . . 7
β’ ((π β§ π₯ β β) β (((πΉβ1)βπ₯) β β β§ 0 β€ ((πΉβ1)βπ₯))) |
45 | 44 | simpld 496 |
. . . . . 6
β’ ((π β§ π₯ β β) β ((πΉβ1)βπ₯) β β) |
46 | 44 | simprd 497 |
. . . . . 6
β’ ((π β§ π₯ β β) β 0 β€ ((πΉβ1)βπ₯)) |
47 | 37 | fveq1d 6891 |
. . . . . . . . . 10
β’ (π = 1 β ((πΉβπ)βπ₯) = ((πΉβ1)βπ₯)) |
48 | | fvex 6902 |
. . . . . . . . . 10
β’ ((πΉβ1)βπ₯) β V |
49 | 47, 10, 48 | fvmpt 6996 |
. . . . . . . . 9
β’ (1 β
β β ((π β
β β¦ ((πΉβπ)βπ₯))β1) = ((πΉβ1)βπ₯)) |
50 | 9, 49 | ax-mp 5 |
. . . . . . . 8
β’ ((π β β β¦ ((πΉβπ)βπ₯))β1) = ((πΉβ1)βπ₯) |
51 | | fnfvelrn 7080 |
. . . . . . . . 9
β’ (((π β β β¦ ((πΉβπ)βπ₯)) Fn β β§ 1 β β) β
((π β β β¦
((πΉβπ)βπ₯))β1) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
52 | 18, 9, 51 | sylancl 587 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β ((π β β β¦ ((πΉβπ)βπ₯))β1) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
53 | 50, 52 | eqeltrrid 2839 |
. . . . . . 7
β’ ((π β§ π₯ β β) β ((πΉβ1)βπ₯) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
54 | 8, 16, 33, 53 | suprubd 12173 |
. . . . . 6
β’ ((π β§ π₯ β β) β ((πΉβ1)βπ₯) β€ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
55 | 36, 45, 34, 46, 54 | letrd 11368 |
. . . . 5
β’ ((π β§ π₯ β β) β 0 β€ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
56 | | elxrge0 13431 |
. . . . 5
β’ (sup(ran
(π β β β¦
((πΉβπ)βπ₯)), β, < ) β (0[,]+β)
β (sup(ran (π β
β β¦ ((πΉβπ)βπ₯)), β, < ) β
β* β§ 0 β€ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < ))) |
57 | 35, 55, 56 | sylanbrc 584 |
. . . 4
β’ ((π β§ π₯ β β) β sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < ) β
(0[,]+β)) |
58 | | itg2mono.1 |
. . . 4
β’ πΊ = (π₯ β β β¦ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
59 | 57, 58 | fmptd 7111 |
. . 3
β’ (π β πΊ:ββΆ(0[,]+β)) |
60 | | itg2cl 25242 |
. . 3
β’ (πΊ:ββΆ(0[,]+β)
β (β«2βπΊ) β
β*) |
61 | 59, 60 | syl 17 |
. 2
β’ (π β
(β«2βπΊ)
β β*) |
62 | | itg2mono.6 |
. . 3
β’ π = sup(ran (π β β β¦
(β«2β(πΉβπ))), β*, <
) |
63 | | icossicc 13410 |
. . . . . . . 8
β’
(0[,)+β) β (0[,]+β) |
64 | | fss 6732 |
. . . . . . . 8
β’ (((πΉβπ):ββΆ(0[,)+β) β§
(0[,)+β) β (0[,]+β)) β (πΉβπ):ββΆ(0[,]+β)) |
65 | 1, 63, 64 | sylancl 587 |
. . . . . . 7
β’ ((π β§ π β β) β (πΉβπ):ββΆ(0[,]+β)) |
66 | | itg2cl 25242 |
. . . . . . 7
β’ ((πΉβπ):ββΆ(0[,]+β) β
(β«2β(πΉβπ)) β
β*) |
67 | 65, 66 | syl 17 |
. . . . . 6
β’ ((π β§ π β β) β
(β«2β(πΉβπ)) β
β*) |
68 | 67 | fmpttd 7112 |
. . . . 5
β’ (π β (π β β β¦
(β«2β(πΉβπ))):ββΆβ*) |
69 | 68 | frnd 6723 |
. . . 4
β’ (π β ran (π β β β¦
(β«2β(πΉβπ))) β
β*) |
70 | | supxrcl 13291 |
. . . 4
β’ (ran
(π β β β¦
(β«2β(πΉβπ))) β β* β
sup(ran (π β β
β¦ (β«2β(πΉβπ))), β*, < ) β
β*) |
71 | 69, 70 | syl 17 |
. . 3
β’ (π β sup(ran (π β β β¦
(β«2β(πΉβπ))), β*, < ) β
β*) |
72 | 62, 71 | eqeltrid 2838 |
. 2
β’ (π β π β
β*) |
73 | | itg2mono.2 |
. . . . . . . . 9
β’ ((π β§ π β β) β (πΉβπ) β MblFn) |
74 | 73 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β§ π β β) β (πΉβπ) β MblFn) |
75 | 1 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β§ π β β) β (πΉβπ):ββΆ(0[,)+β)) |
76 | | itg2mono.4 |
. . . . . . . . 9
β’ ((π β§ π β β) β (πΉβπ) βr β€ (πΉβ(π + 1))) |
77 | 76 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β§ π β β) β (πΉβπ) βr β€ (πΉβ(π + 1))) |
78 | 17 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β§ π₯ β β) β
βπ¦ β β
βπ β β
((πΉβπ)βπ₯) β€ π¦) |
79 | | simprll 778 |
. . . . . . . 8
β’ ((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β π β dom
β«1) |
80 | | simprlr 779 |
. . . . . . . 8
β’ ((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β π βr β€ πΊ) |
81 | | simprr 772 |
. . . . . . . 8
β’ ((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β Β¬
(β«1βπ)
β€ π) |
82 | 58, 74, 75, 77, 78, 62, 79, 80, 81 | itg2monolem3 25262 |
. . . . . . 7
β’ ((π β§ ((π β dom β«1 β§ π βr β€ πΊ) β§ Β¬
(β«1βπ)
β€ π)) β
(β«1βπ)
β€ π) |
83 | 82 | expr 458 |
. . . . . 6
β’ ((π β§ (π β dom β«1 β§ π βr β€ πΊ)) β (Β¬
(β«1βπ)
β€ π β
(β«1βπ)
β€ π)) |
84 | 83 | pm2.18d 127 |
. . . . 5
β’ ((π β§ (π β dom β«1 β§ π βr β€ πΊ)) β
(β«1βπ)
β€ π) |
85 | 84 | expr 458 |
. . . 4
β’ ((π β§ π β dom β«1) β (π βr β€ πΊ β
(β«1βπ)
β€ π)) |
86 | 85 | ralrimiva 3147 |
. . 3
β’ (π β βπ β dom β«1(π βr β€ πΊ β
(β«1βπ)
β€ π)) |
87 | | itg2leub 25244 |
. . . 4
β’ ((πΊ:ββΆ(0[,]+β)
β§ π β
β*) β ((β«2βπΊ) β€ π β βπ β dom β«1(π βr β€ πΊ β
(β«1βπ)
β€ π))) |
88 | 59, 72, 87 | syl2anc 585 |
. . 3
β’ (π β
((β«2βπΊ) β€ π β βπ β dom β«1(π βr β€ πΊ β
(β«1βπ)
β€ π))) |
89 | 86, 88 | mpbird 257 |
. 2
β’ (π β
(β«2βπΊ)
β€ π) |
90 | 22 | feq1d 6700 |
. . . . . . . . . . 11
β’ (π = π β ((πΉβπ):ββΆ(0[,)+β) β (πΉβπ):ββΆ(0[,)+β))) |
91 | 90 | cbvralvw 3235 |
. . . . . . . . . 10
β’
(βπ β
β (πΉβπ):ββΆ(0[,)+β)
β βπ β
β (πΉβπ):ββΆ(0[,)+β)) |
92 | 39, 91 | sylib 217 |
. . . . . . . . 9
β’ (π β βπ β β (πΉβπ):ββΆ(0[,)+β)) |
93 | 92 | r19.21bi 3249 |
. . . . . . . 8
β’ ((π β§ π β β) β (πΉβπ):ββΆ(0[,)+β)) |
94 | | fss 6732 |
. . . . . . . 8
β’ (((πΉβπ):ββΆ(0[,)+β) β§
(0[,)+β) β (0[,]+β)) β (πΉβπ):ββΆ(0[,]+β)) |
95 | 93, 63, 94 | sylancl 587 |
. . . . . . 7
β’ ((π β§ π β β) β (πΉβπ):ββΆ(0[,]+β)) |
96 | 59 | adantr 482 |
. . . . . . 7
β’ ((π β§ π β β) β πΊ:ββΆ(0[,]+β)) |
97 | 8, 16, 33 | 3jca 1129 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β β) β (ran (π β β β¦ ((πΉβπ)βπ₯)) β β β§ ran (π β β β¦ ((πΉβπ)βπ₯)) β β
β§ βπ¦ β β βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦)) |
98 | 97 | adantlr 714 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π₯ β β) β (ran (π β β β¦ ((πΉβπ)βπ₯)) β β β§ ran (π β β β¦ ((πΉβπ)βπ₯)) β β
β§ βπ¦ β β βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦)) |
99 | 25 | ad2antlr 726 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π₯ β β) β ((π β β β¦ ((πΉβπ)βπ₯))βπ) = ((πΉβπ)βπ₯)) |
100 | 18 | adantlr 714 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π₯ β β) β (π β β β¦ ((πΉβπ)βπ₯)) Fn β) |
101 | | simplr 768 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π₯ β β) β π β β) |
102 | | fnfvelrn 7080 |
. . . . . . . . . . . . . 14
β’ (((π β β β¦ ((πΉβπ)βπ₯)) Fn β β§ π β β) β ((π β β β¦ ((πΉβπ)βπ₯))βπ) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
103 | 100, 101,
102 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π₯ β β) β ((π β β β¦ ((πΉβπ)βπ₯))βπ) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
104 | 99, 103 | eqeltrrd 2835 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π₯ β β) β ((πΉβπ)βπ₯) β ran (π β β β¦ ((πΉβπ)βπ₯))) |
105 | | suprub 12172 |
. . . . . . . . . . . 12
β’ (((ran
(π β β β¦
((πΉβπ)βπ₯)) β β β§ ran (π β β β¦ ((πΉβπ)βπ₯)) β β
β§ βπ¦ β β βπ§ β ran (π β β β¦ ((πΉβπ)βπ₯))π§ β€ π¦) β§ ((πΉβπ)βπ₯) β ran (π β β β¦ ((πΉβπ)βπ₯))) β ((πΉβπ)βπ₯) β€ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
106 | 98, 104, 105 | syl2anc 585 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ π₯ β β) β ((πΉβπ)βπ₯) β€ sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
107 | | simpr 486 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π₯ β β) β π₯ β β) |
108 | | ltso 11291 |
. . . . . . . . . . . . 13
β’ < Or
β |
109 | 108 | supex 9455 |
. . . . . . . . . . . 12
β’ sup(ran
(π β β β¦
((πΉβπ)βπ₯)), β, < ) β V |
110 | 58 | fvmpt2 7007 |
. . . . . . . . . . . 12
β’ ((π₯ β β β§ sup(ran
(π β β β¦
((πΉβπ)βπ₯)), β, < ) β V) β (πΊβπ₯) = sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
111 | 107, 109,
110 | sylancl 587 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ π₯ β β) β (πΊβπ₯) = sup(ran (π β β β¦ ((πΉβπ)βπ₯)), β, < )) |
112 | 106, 111 | breqtrrd 5176 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π₯ β β) β ((πΉβπ)βπ₯) β€ (πΊβπ₯)) |
113 | 112 | ralrimiva 3147 |
. . . . . . . . 9
β’ ((π β§ π β β) β βπ₯ β β ((πΉβπ)βπ₯) β€ (πΊβπ₯)) |
114 | | fveq2 6889 |
. . . . . . . . . . 11
β’ (π₯ = π§ β ((πΉβπ)βπ₯) = ((πΉβπ)βπ§)) |
115 | | fveq2 6889 |
. . . . . . . . . . 11
β’ (π₯ = π§ β (πΊβπ₯) = (πΊβπ§)) |
116 | 114, 115 | breq12d 5161 |
. . . . . . . . . 10
β’ (π₯ = π§ β (((πΉβπ)βπ₯) β€ (πΊβπ₯) β ((πΉβπ)βπ§) β€ (πΊβπ§))) |
117 | 116 | cbvralvw 3235 |
. . . . . . . . 9
β’
(βπ₯ β
β ((πΉβπ)βπ₯) β€ (πΊβπ₯) β βπ§ β β ((πΉβπ)βπ§) β€ (πΊβπ§)) |
118 | 113, 117 | sylib 217 |
. . . . . . . 8
β’ ((π β§ π β β) β βπ§ β β ((πΉβπ)βπ§) β€ (πΊβπ§)) |
119 | 93 | ffnd 6716 |
. . . . . . . . 9
β’ ((π β§ π β β) β (πΉβπ) Fn β) |
120 | 34, 58 | fmptd 7111 |
. . . . . . . . . . 11
β’ (π β πΊ:ββΆβ) |
121 | 120 | ffnd 6716 |
. . . . . . . . . 10
β’ (π β πΊ Fn β) |
122 | 121 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ π β β) β πΊ Fn β) |
123 | | reex 11198 |
. . . . . . . . . 10
β’ β
β V |
124 | 123 | a1i 11 |
. . . . . . . . 9
β’ ((π β§ π β β) β β β
V) |
125 | | inidm 4218 |
. . . . . . . . 9
β’ (β
β© β) = β |
126 | | eqidd 2734 |
. . . . . . . . 9
β’ (((π β§ π β β) β§ π§ β β) β ((πΉβπ)βπ§) = ((πΉβπ)βπ§)) |
127 | | eqidd 2734 |
. . . . . . . . 9
β’ (((π β§ π β β) β§ π§ β β) β (πΊβπ§) = (πΊβπ§)) |
128 | 119, 122,
124, 124, 125, 126, 127 | ofrfval 7677 |
. . . . . . . 8
β’ ((π β§ π β β) β ((πΉβπ) βr β€ πΊ β βπ§ β β ((πΉβπ)βπ§) β€ (πΊβπ§))) |
129 | 118, 128 | mpbird 257 |
. . . . . . 7
β’ ((π β§ π β β) β (πΉβπ) βr β€ πΊ) |
130 | | itg2le 25249 |
. . . . . . 7
β’ (((πΉβπ):ββΆ(0[,]+β) β§ πΊ:ββΆ(0[,]+β)
β§ (πΉβπ) βr β€ πΊ) β
(β«2β(πΉβπ)) β€ (β«2βπΊ)) |
131 | 95, 96, 129, 130 | syl3anc 1372 |
. . . . . 6
β’ ((π β§ π β β) β
(β«2β(πΉβπ)) β€ (β«2βπΊ)) |
132 | 131 | ralrimiva 3147 |
. . . . 5
β’ (π β βπ β β
(β«2β(πΉβπ)) β€ (β«2βπΊ)) |
133 | 68 | ffnd 6716 |
. . . . . . 7
β’ (π β (π β β β¦
(β«2β(πΉβπ))) Fn β) |
134 | | breq1 5151 |
. . . . . . . 8
β’ (π§ = ((π β β β¦
(β«2β(πΉβπ)))βπ) β (π§ β€ (β«2βπΊ) β ((π β β β¦
(β«2β(πΉβπ)))βπ) β€ (β«2βπΊ))) |
135 | 134 | ralrn 7087 |
. . . . . . 7
β’ ((π β β β¦
(β«2β(πΉβπ))) Fn β β (βπ§ β ran (π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ) β βπ β β ((π β β β¦
(β«2β(πΉβπ)))βπ) β€ (β«2βπΊ))) |
136 | 133, 135 | syl 17 |
. . . . . 6
β’ (π β (βπ§ β ran (π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ) β βπ β β ((π β β β¦
(β«2β(πΉβπ)))βπ) β€ (β«2βπΊ))) |
137 | | 2fveq3 6894 |
. . . . . . . . 9
β’ (π = π β (β«2β(πΉβπ)) = (β«2β(πΉβπ))) |
138 | | eqid 2733 |
. . . . . . . . 9
β’ (π β β β¦
(β«2β(πΉβπ))) = (π β β β¦
(β«2β(πΉβπ))) |
139 | | fvex 6902 |
. . . . . . . . 9
β’
(β«2β(πΉβπ)) β V |
140 | 137, 138,
139 | fvmpt 6996 |
. . . . . . . 8
β’ (π β β β ((π β β β¦
(β«2β(πΉβπ)))βπ) = (β«2β(πΉβπ))) |
141 | 140 | breq1d 5158 |
. . . . . . 7
β’ (π β β β (((π β β β¦
(β«2β(πΉβπ)))βπ) β€ (β«2βπΊ) β
(β«2β(πΉβπ)) β€ (β«2βπΊ))) |
142 | 141 | ralbiia 3092 |
. . . . . 6
β’
(βπ β
β ((π β β
β¦ (β«2β(πΉβπ)))βπ) β€ (β«2βπΊ) β βπ β β
(β«2β(πΉβπ)) β€ (β«2βπΊ)) |
143 | 136, 142 | bitrdi 287 |
. . . . 5
β’ (π β (βπ§ β ran (π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ) β βπ β β
(β«2β(πΉβπ)) β€ (β«2βπΊ))) |
144 | 132, 143 | mpbird 257 |
. . . 4
β’ (π β βπ§ β ran (π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ)) |
145 | | supxrleub 13302 |
. . . . 5
β’ ((ran
(π β β β¦
(β«2β(πΉβπ))) β β* β§
(β«2βπΊ)
β β*) β (sup(ran (π β β β¦
(β«2β(πΉβπ))), β*, < ) β€
(β«2βπΊ)
β βπ§ β ran
(π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ))) |
146 | 69, 61, 145 | syl2anc 585 |
. . . 4
β’ (π β (sup(ran (π β β β¦
(β«2β(πΉβπ))), β*, < ) β€
(β«2βπΊ)
β βπ§ β ran
(π β β β¦
(β«2β(πΉβπ)))π§ β€ (β«2βπΊ))) |
147 | 144, 146 | mpbird 257 |
. . 3
β’ (π β sup(ran (π β β β¦
(β«2β(πΉβπ))), β*, < ) β€
(β«2βπΊ)) |
148 | 62, 147 | eqbrtrid 5183 |
. 2
β’ (π β π β€ (β«2βπΊ)) |
149 | 61, 72, 89, 148 | xrletrid 13131 |
1
β’ (π β
(β«2βπΊ)
= π) |