Step | Hyp | Ref
| Expression |
1 | | simpr 486 |
. . . . . 6
β’ ((π β§ (πΈβπ) β ran π) β (πΈβπ) β ran π) |
2 | | fourierdlem41.q |
. . . . . . . . . . 11
β’ (π β π β (πβπ)) |
3 | | fourierdlem41.m |
. . . . . . . . . . . 12
β’ (π β π β β) |
4 | | fourierdlem41.p |
. . . . . . . . . . . . 13
β’ π = (π β β β¦ {π β (β βm
(0...π)) β£ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))}) |
5 | 4 | fourierdlem2 44812 |
. . . . . . . . . . . 12
β’ (π β β β (π β (πβπ) β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))))) |
6 | 3, 5 | syl 17 |
. . . . . . . . . . 11
β’ (π β (π β (πβπ) β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))))) |
7 | 2, 6 | mpbid 231 |
. . . . . . . . . 10
β’ (π β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1))))) |
8 | 7 | simpld 496 |
. . . . . . . . 9
β’ (π β π β (β βm
(0...π))) |
9 | | elmapi 8840 |
. . . . . . . . 9
β’ (π β (β
βm (0...π))
β π:(0...π)βΆβ) |
10 | | ffn 6715 |
. . . . . . . . 9
β’ (π:(0...π)βΆβ β π Fn (0...π)) |
11 | 8, 9, 10 | 3syl 18 |
. . . . . . . 8
β’ (π β π Fn (0...π)) |
12 | 11 | adantr 482 |
. . . . . . 7
β’ ((π β§ (πΈβπ) β ran π) β π Fn (0...π)) |
13 | | fvelrnb 6950 |
. . . . . . 7
β’ (π Fn (0...π) β ((πΈβπ) β ran π β βπ β (0...π)(πβπ) = (πΈβπ))) |
14 | 12, 13 | syl 17 |
. . . . . 6
β’ ((π β§ (πΈβπ) β ran π) β ((πΈβπ) β ran π β βπ β (0...π)(πβπ) = (πΈβπ))) |
15 | 1, 14 | mpbid 231 |
. . . . 5
β’ ((π β§ (πΈβπ) β ran π) β βπ β (0...π)(πβπ) = (πΈβπ)) |
16 | | 0zd 12567 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β 0 β β€) |
17 | | elfzelz 13498 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β π β β€) |
18 | 17 | 3ad2ant2 1135 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β β€) |
19 | | 1zzd 12590 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β 1 β β€) |
20 | 18, 19 | zsubcld 12668 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) β β€) |
21 | | simpll 766 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0...π)) β§ Β¬ 0 < π) β π) |
22 | | elfzle1 13501 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (0...π) β 0 β€ π) |
23 | 22 | anim1i 616 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β (0...π) β§ Β¬ 0 < π) β (0 β€ π β§ Β¬ 0 < π)) |
24 | | 0red 11214 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β (0...π) β§ Β¬ 0 < π) β 0 β β) |
25 | 17 | zred 12663 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (0...π) β π β β) |
26 | 25 | adantr 482 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β (0...π) β§ Β¬ 0 < π) β π β β) |
27 | 24, 26 | eqleltd 11355 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β (0...π) β§ Β¬ 0 < π) β (0 = π β (0 β€ π β§ Β¬ 0 < π))) |
28 | 23, 27 | mpbird 257 |
. . . . . . . . . . . . . . . . 17
β’ ((π β (0...π) β§ Β¬ 0 < π) β 0 = π) |
29 | 28 | eqcomd 2739 |
. . . . . . . . . . . . . . . 16
β’ ((π β (0...π) β§ Β¬ 0 < π) β π = 0) |
30 | 29 | adantll 713 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0...π)) β§ Β¬ 0 < π) β π = 0) |
31 | | fveq2 6889 |
. . . . . . . . . . . . . . . 16
β’ (π = 0 β (πβπ) = (πβ0)) |
32 | 7 | simprld 771 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((πβ0) = π΄ β§ (πβπ) = π΅)) |
33 | 32 | simpld 496 |
. . . . . . . . . . . . . . . 16
β’ (π β (πβ0) = π΄) |
34 | 31, 33 | sylan9eqr 2795 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π = 0) β (πβπ) = π΄) |
35 | 21, 30, 34 | syl2anc 585 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0...π)) β§ Β¬ 0 < π) β (πβπ) = π΄) |
36 | 35 | 3adantl3 1169 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ Β¬ 0 < π) β (πβπ) = π΄) |
37 | | simpr 486 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ (πβπ) = (πΈβπ)) β (πβπ) = (πΈβπ)) |
38 | | fourierdlem41.a |
. . . . . . . . . . . . . . . . . . 19
β’ (π β π΄ β β) |
39 | 38 | rexrd 11261 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β π΄ β
β*) |
40 | | fourierdlem41.b |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π΅ β β) |
41 | 40 | rexrd 11261 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β π΅ β
β*) |
42 | | fourierdlem41.altb |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β π΄ < π΅) |
43 | | fourierdlem41.t |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ π = (π΅ β π΄) |
44 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) = (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) |
45 | 38, 40, 42, 43, 44 | fourierdlem4 44814 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))):ββΆ(π΄(,]π΅)) |
46 | | fourierdlem41.e |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ πΈ = (π₯ β β β¦ (π₯ + (πβπ₯))) |
47 | 46 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β πΈ = (π₯ β β β¦ (π₯ + (πβπ₯)))) |
48 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π β§ π₯ β β) β π₯ β β) |
49 | 40 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ ((π β§ π₯ β β) β π΅ β β) |
50 | 49, 48 | resubcld 11639 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ ((π β§ π₯ β β) β (π΅ β π₯) β β) |
51 | 40, 38 | resubcld 11639 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (π β (π΅ β π΄) β β) |
52 | 43, 51 | eqeltrid 2838 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (π β π β β) |
53 | 52 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ ((π β§ π₯ β β) β π β β) |
54 | | 0red 11214 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (π β 0 β
β) |
55 | 38, 40 | posdifd 11798 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
β’ (π β (π΄ < π΅ β 0 < (π΅ β π΄))) |
56 | 42, 55 | mpbid 231 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
β’ (π β 0 < (π΅ β π΄)) |
57 | 43 | eqcomi 2742 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
β’ (π΅ β π΄) = π |
58 | 57 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
β’ (π β (π΅ β π΄) = π) |
59 | 56, 58 | breqtrd 5174 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (π β 0 < π) |
60 | 54, 59 | gtned 11346 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (π β π β 0) |
61 | 60 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ ((π β§ π₯ β β) β π β 0) |
62 | 50, 53, 61 | redivcld 12039 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ ((π β§ π₯ β β) β ((π΅ β π₯) / π) β β) |
63 | 62 | flcld 13760 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ ((π β§ π₯ β β) β
(ββ((π΅ β
π₯) / π)) β β€) |
64 | 63 | zred 12663 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ ((π β§ π₯ β β) β
(ββ((π΅ β
π₯) / π)) β β) |
65 | 64, 53 | remulcld 11241 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π β§ π₯ β β) β
((ββ((π΅ β
π₯) / π)) Β· π) β β) |
66 | | fourierdlem41.z |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ π = (π₯ β β β¦
((ββ((π΅ β
π₯) / π)) Β· π)) |
67 | 66 | fvmpt2 7007 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π₯ β β β§
((ββ((π΅ β
π₯) / π)) Β· π) β β) β (πβπ₯) = ((ββ((π΅ β π₯) / π)) Β· π)) |
68 | 48, 65, 67 | syl2anc 585 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π β§ π₯ β β) β (πβπ₯) = ((ββ((π΅ β π₯) / π)) Β· π)) |
69 | 68 | oveq2d 7422 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π β§ π₯ β β) β (π₯ + (πβπ₯)) = (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) |
70 | 69 | mpteq2dva 5248 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β (π₯ β β β¦ (π₯ + (πβπ₯))) = (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π)))) |
71 | 47, 70 | eqtrd 2773 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β πΈ = (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π)))) |
72 | 71 | feq1d 6700 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β (πΈ:ββΆ(π΄(,]π΅) β (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))):ββΆ(π΄(,]π΅))) |
73 | 45, 72 | mpbird 257 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β πΈ:ββΆ(π΄(,]π΅)) |
74 | | fourierdlem41.x |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π β β) |
75 | 73, 74 | ffvelcdmd 7085 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (πΈβπ) β (π΄(,]π΅)) |
76 | | iocgtlb 44202 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β*
β§ π΅ β
β* β§ (πΈβπ) β (π΄(,]π΅)) β π΄ < (πΈβπ)) |
77 | 39, 41, 75, 76 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β π΄ < (πΈβπ)) |
78 | 38, 77 | gtned 11346 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (πΈβπ) β π΄) |
79 | 78 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ (πβπ) = (πΈβπ)) β (πΈβπ) β π΄) |
80 | 37, 79 | eqnetrd 3009 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ (πβπ) = (πΈβπ)) β (πβπ) β π΄) |
81 | 80 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ (πβπ) = (πΈβπ)) β§ Β¬ 0 < π) β (πβπ) β π΄) |
82 | 81 | 3adantl2 1168 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ Β¬ 0 < π) β (πβπ) β π΄) |
83 | 82 | neneqd 2946 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ Β¬ 0 < π) β Β¬ (πβπ) = π΄) |
84 | 36, 83 | condan 817 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β 0 < π) |
85 | | zltlem1 12612 |
. . . . . . . . . . . . 13
β’ ((0
β β€ β§ π
β β€) β (0 < π β 0 β€ (π β 1))) |
86 | 16, 18, 85 | syl2anc 585 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (0 < π β 0 β€ (π β 1))) |
87 | 84, 86 | mpbid 231 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β 0 β€ (π β 1)) |
88 | | eluz2 12825 |
. . . . . . . . . . 11
β’ ((π β 1) β
(β€β₯β0) β (0 β β€ β§ (π β 1) β β€ β§
0 β€ (π β
1))) |
89 | 16, 20, 87, 88 | syl3anbrc 1344 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) β
(β€β₯β0)) |
90 | | elfzel2 13496 |
. . . . . . . . . . 11
β’ (π β (0...π) β π β β€) |
91 | 90 | 3ad2ant2 1135 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β β€) |
92 | | 1red 11212 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β 1 β β) |
93 | 25, 92 | resubcld 11639 |
. . . . . . . . . . . 12
β’ (π β (0...π) β (π β 1) β β) |
94 | 90 | zred 12663 |
. . . . . . . . . . . 12
β’ (π β (0...π) β π β β) |
95 | 25 | ltm1d 12143 |
. . . . . . . . . . . 12
β’ (π β (0...π) β (π β 1) < π) |
96 | | elfzle2 13502 |
. . . . . . . . . . . 12
β’ (π β (0...π) β π β€ π) |
97 | 93, 25, 94, 95, 96 | ltletrd 11371 |
. . . . . . . . . . 11
β’ (π β (0...π) β (π β 1) < π) |
98 | 97 | 3ad2ant2 1135 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) < π) |
99 | | elfzo2 13632 |
. . . . . . . . . 10
β’ ((π β 1) β (0..^π) β ((π β 1) β
(β€β₯β0) β§ π β β€ β§ (π β 1) < π)) |
100 | 89, 91, 98, 99 | syl3anbrc 1344 |
. . . . . . . . 9
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) β (0..^π)) |
101 | 8, 9 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β π:(0...π)βΆβ) |
102 | 101 | 3ad2ant1 1134 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π:(0...π)βΆβ) |
103 | 93, 94, 97 | ltled 11359 |
. . . . . . . . . . . . . 14
β’ (π β (0...π) β (π β 1) β€ π) |
104 | 103 | 3ad2ant2 1135 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) β€ π) |
105 | 16, 91, 20, 87, 104 | elfzd 13489 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (π β 1) β (0...π)) |
106 | 102, 105 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) β β) |
107 | 106 | rexrd 11261 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) β
β*) |
108 | 25 | recnd 11239 |
. . . . . . . . . . . . . . 15
β’ (π β (0...π) β π β β) |
109 | | 1cnd 11206 |
. . . . . . . . . . . . . . 15
β’ (π β (0...π) β 1 β β) |
110 | 108, 109 | npcand 11572 |
. . . . . . . . . . . . . 14
β’ (π β (0...π) β ((π β 1) + 1) = π) |
111 | 110 | fveq2d 6893 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β (πβ((π β 1) + 1)) = (πβπ)) |
112 | 111 | adantl 483 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π)) β (πβ((π β 1) + 1)) = (πβπ)) |
113 | 101 | ffvelcdmda 7084 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0...π)) β (πβπ) β β) |
114 | 113 | rexrd 11261 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π)) β (πβπ) β
β*) |
115 | 112, 114 | eqeltrd 2834 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π)) β (πβ((π β 1) + 1)) β
β*) |
116 | 115 | 3adant3 1133 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ((π β 1) + 1)) β
β*) |
117 | | id 22 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π β π₯ = π) |
118 | | fveq2 6889 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π β (πβπ₯) = (πβπ)) |
119 | 117, 118 | oveq12d 7424 |
. . . . . . . . . . . . . . 15
β’ (π₯ = π β (π₯ + (πβπ₯)) = (π + (πβπ))) |
120 | 119 | adantl 483 |
. . . . . . . . . . . . . 14
β’ ((π β§ π₯ = π) β (π₯ + (πβπ₯)) = (π + (πβπ))) |
121 | 66 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β π = (π₯ β β β¦
((ββ((π΅ β
π₯) / π)) Β· π))) |
122 | | oveq2 7414 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ = π β (π΅ β π₯) = (π΅ β π)) |
123 | 122 | oveq1d 7421 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = π β ((π΅ β π₯) / π) = ((π΅ β π) / π)) |
124 | 123 | fveq2d 6893 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β (ββ((π΅ β π₯) / π)) = (ββ((π΅ β π) / π))) |
125 | 124 | oveq1d 7421 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β ((ββ((π΅ β π₯) / π)) Β· π) = ((ββ((π΅ β π) / π)) Β· π)) |
126 | 125 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π₯ = π) β ((ββ((π΅ β π₯) / π)) Β· π) = ((ββ((π΅ β π) / π)) Β· π)) |
127 | 40, 74 | resubcld 11639 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (π΅ β π) β β) |
128 | 127, 52, 60 | redivcld 12039 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((π΅ β π) / π) β β) |
129 | 128 | flcld 13760 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (ββ((π΅ β π) / π)) β β€) |
130 | 129 | zred 12663 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (ββ((π΅ β π) / π)) β β) |
131 | 130, 52 | remulcld 11241 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((ββ((π΅ β π) / π)) Β· π) β β) |
132 | 121, 126,
74, 131 | fvmptd 7003 |
. . . . . . . . . . . . . . . 16
β’ (π β (πβπ) = ((ββ((π΅ β π) / π)) Β· π)) |
133 | 132, 131 | eqeltrd 2834 |
. . . . . . . . . . . . . . 15
β’ (π β (πβπ) β β) |
134 | 74, 133 | readdcld 11240 |
. . . . . . . . . . . . . 14
β’ (π β (π + (πβπ)) β β) |
135 | 47, 120, 74, 134 | fvmptd 7003 |
. . . . . . . . . . . . 13
β’ (π β (πΈβπ) = (π + (πβπ))) |
136 | 135, 134 | eqeltrd 2834 |
. . . . . . . . . . . 12
β’ (π β (πΈβπ) β β) |
137 | 136 | rexrd 11261 |
. . . . . . . . . . 11
β’ (π β (πΈβπ) β
β*) |
138 | 137 | 3ad2ant1 1134 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β
β*) |
139 | | simp1 1137 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π) |
140 | | ovex 7439 |
. . . . . . . . . . . . . 14
β’ (π β 1) β
V |
141 | | eleq1 2822 |
. . . . . . . . . . . . . . . 16
β’ (π = (π β 1) β (π β (0..^π) β (π β 1) β (0..^π))) |
142 | 141 | anbi2d 630 |
. . . . . . . . . . . . . . 15
β’ (π = (π β 1) β ((π β§ π β (0..^π)) β (π β§ (π β 1) β (0..^π)))) |
143 | | fveq2 6889 |
. . . . . . . . . . . . . . . 16
β’ (π = (π β 1) β (πβπ) = (πβ(π β 1))) |
144 | | oveq1 7413 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π β 1) β (π + 1) = ((π β 1) + 1)) |
145 | 144 | fveq2d 6893 |
. . . . . . . . . . . . . . . 16
β’ (π = (π β 1) β (πβ(π + 1)) = (πβ((π β 1) + 1))) |
146 | 143, 145 | breq12d 5161 |
. . . . . . . . . . . . . . 15
β’ (π = (π β 1) β ((πβπ) < (πβ(π + 1)) β (πβ(π β 1)) < (πβ((π β 1) + 1)))) |
147 | 142, 146 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π = (π β 1) β (((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) β ((π β§ (π β 1) β (0..^π)) β (πβ(π β 1)) < (πβ((π β 1) + 1))))) |
148 | 7 | simprrd 773 |
. . . . . . . . . . . . . . 15
β’ (π β βπ β (0..^π)(πβπ) < (πβ(π + 1))) |
149 | 148 | r19.21bi 3249 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) |
150 | 140, 147,
149 | vtocl 3550 |
. . . . . . . . . . . . 13
β’ ((π β§ (π β 1) β (0..^π)) β (πβ(π β 1)) < (πβ((π β 1) + 1))) |
151 | 139, 100,
150 | syl2anc 585 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πβ((π β 1) + 1))) |
152 | 111 | 3ad2ant2 1135 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ((π β 1) + 1)) = (πβπ)) |
153 | 151, 152 | breqtrd 5174 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πβπ)) |
154 | | simp3 1139 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβπ) = (πΈβπ)) |
155 | 153, 154 | breqtrd 5174 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πΈβπ)) |
156 | 136 | leidd 11777 |
. . . . . . . . . . . . . 14
β’ (π β (πΈβπ) β€ (πΈβπ)) |
157 | 156 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πΈβπ)) |
158 | 37 | eqcomd 2739 |
. . . . . . . . . . . . 13
β’ ((π β§ (πβπ) = (πΈβπ)) β (πΈβπ) = (πβπ)) |
159 | 157, 158 | breqtrd 5174 |
. . . . . . . . . . . 12
β’ ((π β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πβπ)) |
160 | 159 | 3adant2 1132 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πβπ)) |
161 | 110 | eqcomd 2739 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β π = ((π β 1) + 1)) |
162 | 161 | fveq2d 6893 |
. . . . . . . . . . . 12
β’ (π β (0...π) β (πβπ) = (πβ((π β 1) + 1))) |
163 | 162 | 3ad2ant2 1135 |
. . . . . . . . . . 11
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβπ) = (πβ((π β 1) + 1))) |
164 | 160, 163 | breqtrd 5174 |
. . . . . . . . . 10
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πβ((π β 1) + 1))) |
165 | 107, 116,
138, 155, 164 | eliocd 44207 |
. . . . . . . . 9
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
166 | 143, 145 | oveq12d 7424 |
. . . . . . . . . . 11
β’ (π = (π β 1) β ((πβπ)(,](πβ(π + 1))) = ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
167 | 166 | eleq2d 2820 |
. . . . . . . . . 10
β’ (π = (π β 1) β ((πΈβπ) β ((πβπ)(,](πβ(π + 1))) β (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1))))) |
168 | 167 | rspcev 3613 |
. . . . . . . . 9
β’ (((π β 1) β (0..^π) β§ (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1)))) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
169 | 100, 165,
168 | syl2anc 585 |
. . . . . . . 8
β’ ((π β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
170 | 169 | 3exp 1120 |
. . . . . . 7
β’ (π β (π β (0...π) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))))) |
171 | 170 | adantr 482 |
. . . . . 6
β’ ((π β§ (πΈβπ) β ran π) β (π β (0...π) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))))) |
172 | 171 | rexlimdv 3154 |
. . . . 5
β’ ((π β§ (πΈβπ) β ran π) β (βπ β (0...π)(πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
173 | 15, 172 | mpd 15 |
. . . 4
β’ ((π β§ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
174 | 3 | adantr 482 |
. . . . . 6
β’ ((π β§ Β¬ (πΈβπ) β ran π) β π β β) |
175 | 101 | adantr 482 |
. . . . . 6
β’ ((π β§ Β¬ (πΈβπ) β ran π) β π:(0...π)βΆβ) |
176 | | iocssicc 13411 |
. . . . . . . 8
β’ ((πβ0)(,](πβπ)) β ((πβ0)[,](πβπ)) |
177 | 32 | simprd 497 |
. . . . . . . . . 10
β’ (π β (πβπ) = π΅) |
178 | 33, 177 | oveq12d 7424 |
. . . . . . . . 9
β’ (π β ((πβ0)(,](πβπ)) = (π΄(,]π΅)) |
179 | 75, 178 | eleqtrrd 2837 |
. . . . . . . 8
β’ (π β (πΈβπ) β ((πβ0)(,](πβπ))) |
180 | 176, 179 | sselid 3980 |
. . . . . . 7
β’ (π β (πΈβπ) β ((πβ0)[,](πβπ))) |
181 | 180 | adantr 482 |
. . . . . 6
β’ ((π β§ Β¬ (πΈβπ) β ran π) β (πΈβπ) β ((πβ0)[,](πβπ))) |
182 | | simpr 486 |
. . . . . 6
β’ ((π β§ Β¬ (πΈβπ) β ran π) β Β¬ (πΈβπ) β ran π) |
183 | | fveq2 6889 |
. . . . . . . . 9
β’ (π = π β (πβπ) = (πβπ)) |
184 | 183 | breq1d 5158 |
. . . . . . . 8
β’ (π = π β ((πβπ) < (πΈβπ) β (πβπ) < (πΈβπ))) |
185 | 184 | cbvrabv 3443 |
. . . . . . 7
β’ {π β (0..^π) β£ (πβπ) < (πΈβπ)} = {π β (0..^π) β£ (πβπ) < (πΈβπ)} |
186 | 185 | supeq1i 9439 |
. . . . . 6
β’
sup({π β
(0..^π) β£ (πβπ) < (πΈβπ)}, β, < ) = sup({π β (0..^π) β£ (πβπ) < (πΈβπ)}, β, < ) |
187 | 174, 175,
181, 182, 186 | fourierdlem25 44835 |
. . . . 5
β’ ((π β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,)(πβ(π + 1)))) |
188 | | ioossioc 44192 |
. . . . . . . 8
β’ ((πβπ)(,)(πβ(π + 1))) β ((πβπ)(,](πβ(π + 1))) |
189 | 188 | a1i 11 |
. . . . . . 7
β’ (((π β§ Β¬ (πΈβπ) β ran π) β§ π β (0..^π)) β ((πβπ)(,)(πβ(π + 1))) β ((πβπ)(,](πβ(π + 1)))) |
190 | 189 | sseld 3981 |
. . . . . 6
β’ (((π β§ Β¬ (πΈβπ) β ran π) β§ π β (0..^π)) β ((πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
191 | 190 | reximdva 3169 |
. . . . 5
β’ ((π β§ Β¬ (πΈβπ) β ran π) β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
192 | 187, 191 | mpd 15 |
. . . 4
β’ ((π β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
193 | 173, 192 | pm2.61dan 812 |
. . 3
β’ (π β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
194 | 101 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β π:(0...π)βΆβ) |
195 | | elfzofz 13645 |
. . . . . . . . . 10
β’ (π β (0..^π) β π β (0...π)) |
196 | 195 | adantl 483 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β π β (0...π)) |
197 | 194, 196 | ffvelcdmd 7085 |
. . . . . . . 8
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
198 | 197 | 3adant3 1133 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β β) |
199 | 133 | 3ad2ant1 1134 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β β) |
200 | 198, 199 | resubcld 11639 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ) β (πβπ)) β β) |
201 | 136 | 3ad2ant1 1134 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β β) |
202 | 198 | rexrd 11261 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β
β*) |
203 | | fzofzp1 13726 |
. . . . . . . . . . . . 13
β’ (π β (0..^π) β (π + 1) β (0...π)) |
204 | 203 | adantl 483 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β (π + 1) β (0...π)) |
205 | 194, 204 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β β) |
206 | 205 | rexrd 11261 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β
β*) |
207 | 206 | 3adant3 1133 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβ(π + 1)) β
β*) |
208 | | simp3 1139 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
209 | | iocgtlb 44202 |
. . . . . . . . 9
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (πΈβπ)) |
210 | 202, 207,
208, 209 | syl3anc 1372 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (πΈβπ)) |
211 | 198, 201,
199, 210 | ltsub1dd 11823 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ) β (πβπ)) < ((πΈβπ) β (πβπ))) |
212 | 135 | oveq1d 7421 |
. . . . . . . . 9
β’ (π β ((πΈβπ) β (πβπ)) = ((π + (πβπ)) β (πβπ))) |
213 | 74 | recnd 11239 |
. . . . . . . . . 10
β’ (π β π β β) |
214 | 133 | recnd 11239 |
. . . . . . . . . 10
β’ (π β (πβπ) β β) |
215 | 213, 214 | pncand 11569 |
. . . . . . . . 9
β’ (π β ((π + (πβπ)) β (πβπ)) = π) |
216 | 212, 215 | eqtrd 2773 |
. . . . . . . 8
β’ (π β ((πΈβπ) β (πβπ)) = π) |
217 | 216 | 3ad2ant1 1134 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΈβπ) β (πβπ)) = π) |
218 | 211, 217 | breqtrd 5174 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ) β (πβπ)) < π) |
219 | | elioore 13351 |
. . . . . . . . . . 11
β’ (π¦ β (((πβπ) β (πβπ))(,)π) β π¦ β β) |
220 | 132 | oveq2d 7422 |
. . . . . . . . . . . . . 14
β’ (π β (π¦ + (πβπ)) = (π¦ + ((ββ((π΅ β π) / π)) Β· π))) |
221 | 130 | recnd 11239 |
. . . . . . . . . . . . . . 15
β’ (π β (ββ((π΅ β π) / π)) β β) |
222 | 52 | recnd 11239 |
. . . . . . . . . . . . . . 15
β’ (π β π β β) |
223 | 221, 222 | mulneg1d 11664 |
. . . . . . . . . . . . . 14
β’ (π β (-(ββ((π΅ β π) / π)) Β· π) = -((ββ((π΅ β π) / π)) Β· π)) |
224 | 220, 223 | oveq12d 7424 |
. . . . . . . . . . . . 13
β’ (π β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) = ((π¦ + ((ββ((π΅ β π) / π)) Β· π)) + -((ββ((π΅ β π) / π)) Β· π))) |
225 | 224 | adantr 482 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β β) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) = ((π¦ + ((ββ((π΅ β π) / π)) Β· π)) + -((ββ((π΅ β π) / π)) Β· π))) |
226 | | simpr 486 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π¦ β β) β π¦ β β) |
227 | 131 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π¦ β β) β
((ββ((π΅ β
π) / π)) Β· π) β β) |
228 | 226, 227 | readdcld 11240 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β β) β (π¦ + ((ββ((π΅ β π) / π)) Β· π)) β β) |
229 | 228 | recnd 11239 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β β) β (π¦ + ((ββ((π΅ β π) / π)) Β· π)) β β) |
230 | 227 | recnd 11239 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β β) β
((ββ((π΅ β
π) / π)) Β· π) β β) |
231 | 229, 230 | negsubd 11574 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β β) β ((π¦ + ((ββ((π΅ β π) / π)) Β· π)) + -((ββ((π΅ β π) / π)) Β· π)) = ((π¦ + ((ββ((π΅ β π) / π)) Β· π)) β ((ββ((π΅ β π) / π)) Β· π))) |
232 | 226 | recnd 11239 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β β) β π¦ β β) |
233 | 232, 230 | pncand 11569 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β β) β ((π¦ + ((ββ((π΅ β π) / π)) Β· π)) β ((ββ((π΅ β π) / π)) Β· π)) = π¦) |
234 | 225, 231,
233 | 3eqtrrd 2778 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β β) β π¦ = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
235 | 219, 234 | sylan2 594 |
. . . . . . . . . 10
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
236 | 235 | 3ad2antl1 1186 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
237 | | simpl1 1192 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π) |
238 | | fourierdlem41.qssd |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β ((πβπ)(,)(πβ(π + 1))) β π·) |
239 | 238 | 3adant3 1133 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πβ(π + 1))) β π·) |
240 | 239 | adantr 482 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ)(,)(πβ(π + 1))) β π·) |
241 | 202 | adantr 482 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β
β*) |
242 | 207 | adantr 482 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβ(π + 1)) β
β*) |
243 | 219 | adantl 483 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β β) |
244 | 133 | adantr 482 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
245 | 243, 244 | readdcld 11240 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β β) |
246 | 245 | 3ad2antl1 1186 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β β) |
247 | 133 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
248 | 197, 247 | resubcld 11639 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β (0..^π)) β ((πβπ) β (πβπ)) β β) |
249 | 248 | rexrd 11261 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π)) β ((πβπ) β (πβπ)) β
β*) |
250 | 249 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) β
β*) |
251 | 74 | rexrd 11261 |
. . . . . . . . . . . . . . . 16
β’ (π β π β
β*) |
252 | 251 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π β
β*) |
253 | | simpr 486 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β (((πβπ) β (πβπ))(,)π)) |
254 | | ioogtlb 44195 |
. . . . . . . . . . . . . . 15
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) < π¦) |
255 | 250, 252,
253, 254 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) < π¦) |
256 | 197 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
257 | 133 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
258 | 219 | adantl 483 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β β) |
259 | 256, 257,
258 | ltsubaddd 11807 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (((πβπ) β (πβπ)) < π¦ β (πβπ) < (π¦ + (πβπ)))) |
260 | 255, 259 | mpbid 231 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) < (π¦ + (πβπ))) |
261 | 260 | 3adantl3 1169 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) < (π¦ + (πβπ))) |
262 | 237, 136 | syl 17 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πΈβπ) β β) |
263 | 205 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβ(π + 1)) β β) |
264 | 263 | 3adantl3 1169 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβ(π + 1)) β β) |
265 | 74 | ad2antrr 725 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π β β) |
266 | | iooltub 44210 |
. . . . . . . . . . . . . . . . 17
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ < π) |
267 | 250, 252,
253, 266 | syl3anc 1372 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ < π) |
268 | 258, 265,
257, 267 | ltadd1dd 11822 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (π + (πβπ))) |
269 | 135 | eqcomd 2739 |
. . . . . . . . . . . . . . . 16
β’ (π β (π + (πβπ)) = (πΈβπ)) |
270 | 269 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π + (πβπ)) = (πΈβπ)) |
271 | 268, 270 | breqtrd 5174 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (πΈβπ)) |
272 | 271 | 3adantl3 1169 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (πΈβπ)) |
273 | | iocleub 44203 |
. . . . . . . . . . . . . . 15
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β€ (πβ(π + 1))) |
274 | 202, 207,
208, 273 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β€ (πβ(π + 1))) |
275 | 274 | adantr 482 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πΈβπ) β€ (πβ(π + 1))) |
276 | 246, 262,
264, 272, 275 | ltletrd 11371 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (πβ(π + 1))) |
277 | 241, 242,
246, 261, 276 | eliood 44198 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β ((πβπ)(,)(πβ(π + 1)))) |
278 | 240, 277 | sseldd 3983 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β π·) |
279 | 237, 128 | syl 17 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π΅ β π) / π) β β) |
280 | 279 | flcld 13760 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (ββ((π΅ β π) / π)) β β€) |
281 | 280 | znegcld 12665 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β -(ββ((π΅ β π) / π)) β β€) |
282 | | negex 11455 |
. . . . . . . . . . 11
β’
-(ββ((π΅
β π) / π)) β V |
283 | | eleq1 2822 |
. . . . . . . . . . . . 13
β’ (π = -(ββ((π΅ β π) / π)) β (π β β€ β
-(ββ((π΅ β
π) / π)) β β€)) |
284 | 283 | 3anbi3d 1443 |
. . . . . . . . . . . 12
β’ (π = -(ββ((π΅ β π) / π)) β ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β (π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€))) |
285 | | oveq1 7413 |
. . . . . . . . . . . . . 14
β’ (π = -(ββ((π΅ β π) / π)) β (π Β· π) = (-(ββ((π΅ β π) / π)) Β· π)) |
286 | 285 | oveq2d 7422 |
. . . . . . . . . . . . 13
β’ (π = -(ββ((π΅ β π) / π)) β ((π¦ + (πβπ)) + (π Β· π)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
287 | 286 | eleq1d 2819 |
. . . . . . . . . . . 12
β’ (π = -(ββ((π΅ β π) / π)) β (((π¦ + (πβπ)) + (π Β· π)) β π· β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·)) |
288 | 284, 287 | imbi12d 345 |
. . . . . . . . . . 11
β’ (π = -(ββ((π΅ β π) / π)) β (((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·) β ((π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·))) |
289 | | ovex 7439 |
. . . . . . . . . . . 12
β’ (π¦ + (πβπ)) β V |
290 | | eleq1 2822 |
. . . . . . . . . . . . . 14
β’ (π₯ = (π¦ + (πβπ)) β (π₯ β π· β (π¦ + (πβπ)) β π·)) |
291 | 290 | 3anbi2d 1442 |
. . . . . . . . . . . . 13
β’ (π₯ = (π¦ + (πβπ)) β ((π β§ π₯ β π· β§ π β β€) β (π β§ (π¦ + (πβπ)) β π· β§ π β β€))) |
292 | | oveq1 7413 |
. . . . . . . . . . . . . 14
β’ (π₯ = (π¦ + (πβπ)) β (π₯ + (π Β· π)) = ((π¦ + (πβπ)) + (π Β· π))) |
293 | 292 | eleq1d 2819 |
. . . . . . . . . . . . 13
β’ (π₯ = (π¦ + (πβπ)) β ((π₯ + (π Β· π)) β π· β ((π¦ + (πβπ)) + (π Β· π)) β π·)) |
294 | 291, 293 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π₯ = (π¦ + (πβπ)) β (((π β§ π₯ β π· β§ π β β€) β (π₯ + (π Β· π)) β π·) β ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·))) |
295 | | fourierdlem41.dper |
. . . . . . . . . . . 12
β’ ((π β§ π₯ β π· β§ π β β€) β (π₯ + (π Β· π)) β π·) |
296 | 289, 294,
295 | vtocl 3550 |
. . . . . . . . . . 11
β’ ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·) |
297 | 282, 288,
296 | vtocl 3550 |
. . . . . . . . . 10
β’ ((π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·) |
298 | 237, 278,
281, 297 | syl3anc 1372 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·) |
299 | 236, 298 | eqeltrd 2834 |
. . . . . . . 8
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β π·) |
300 | 299 | ralrimiva 3147 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β βπ¦ β (((πβπ) β (πβπ))(,)π)π¦ β π·) |
301 | | dfss3 3970 |
. . . . . . 7
β’ ((((πβπ) β (πβπ))(,)π) β π· β βπ¦ β (((πβπ) β (πβπ))(,)π)π¦ β π·) |
302 | 300, 301 | sylibr 233 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)π) β π·) |
303 | | breq1 5151 |
. . . . . . . 8
β’ (π¦ = ((πβπ) β (πβπ)) β (π¦ < π β ((πβπ) β (πβπ)) < π)) |
304 | | oveq1 7413 |
. . . . . . . . 9
β’ (π¦ = ((πβπ) β (πβπ)) β (π¦(,)π) = (((πβπ) β (πβπ))(,)π)) |
305 | 304 | sseq1d 4013 |
. . . . . . . 8
β’ (π¦ = ((πβπ) β (πβπ)) β ((π¦(,)π) β π· β (((πβπ) β (πβπ))(,)π) β π·)) |
306 | 303, 305 | anbi12d 632 |
. . . . . . 7
β’ (π¦ = ((πβπ) β (πβπ)) β ((π¦ < π β§ (π¦(,)π) β π·) β (((πβπ) β (πβπ)) < π β§ (((πβπ) β (πβπ))(,)π) β π·))) |
307 | 306 | rspcev 3613 |
. . . . . 6
β’ ((((πβπ) β (πβπ)) β β β§ (((πβπ) β (πβπ)) < π β§ (((πβπ) β (πβπ))(,)π) β π·)) β βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·)) |
308 | 200, 218,
302, 307 | syl12anc 836 |
. . . . 5
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·)) |
309 | 308 | 3exp 1120 |
. . . 4
β’ (π β (π β (0..^π) β ((πΈβπ) β ((πβπ)(,](πβ(π + 1))) β βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·)))) |
310 | 309 | rexlimdv 3154 |
. . 3
β’ (π β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))) β βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·))) |
311 | 193, 310 | mpd 15 |
. 2
β’ (π β βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·)) |
312 | | 0zd 12567 |
. . . . . . . 8
β’ (π β 0 β
β€) |
313 | 3 | nnzd 12582 |
. . . . . . . 8
β’ (π β π β β€) |
314 | | 1zzd 12590 |
. . . . . . . 8
β’ (π β 1 β
β€) |
315 | | 0le1 11734 |
. . . . . . . . 9
β’ 0 β€
1 |
316 | 315 | a1i 11 |
. . . . . . . 8
β’ (π β 0 β€ 1) |
317 | 3 | nnge1d 12257 |
. . . . . . . 8
β’ (π β 1 β€ π) |
318 | 312, 313,
314, 316, 317 | elfzd 13489 |
. . . . . . 7
β’ (π β 1 β (0...π)) |
319 | 101, 318 | ffvelcdmd 7085 |
. . . . . 6
β’ (π β (πβ1) β β) |
320 | 133, 52 | resubcld 11639 |
. . . . . 6
β’ (π β ((πβπ) β π) β β) |
321 | 319, 320 | resubcld 11639 |
. . . . 5
β’ (π β ((πβ1) β ((πβπ) β π)) β β) |
322 | 321 | adantr 482 |
. . . 4
β’ ((π β§ (πΈβπ) = π΅) β ((πβ1) β ((πβπ) β π)) β β) |
323 | 38 | recnd 11239 |
. . . . . . . . . 10
β’ (π β π΄ β β) |
324 | 323, 222 | pncand 11569 |
. . . . . . . . 9
β’ (π β ((π΄ + π) β π) = π΄) |
325 | 324 | adantr 482 |
. . . . . . . 8
β’ ((π β§ (πΈβπ) = π΅) β ((π΄ + π) β π) = π΄) |
326 | 43 | oveq2i 7417 |
. . . . . . . . . . 11
β’ (π΄ + π) = (π΄ + (π΅ β π΄)) |
327 | 326 | a1i 11 |
. . . . . . . . . 10
β’ ((π β§ (πΈβπ) = π΅) β (π΄ + π) = (π΄ + (π΅ β π΄))) |
328 | 40 | recnd 11239 |
. . . . . . . . . . . 12
β’ (π β π΅ β β) |
329 | 323, 328 | pncan3d 11571 |
. . . . . . . . . . 11
β’ (π β (π΄ + (π΅ β π΄)) = π΅) |
330 | 329 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ (πΈβπ) = π΅) β (π΄ + (π΅ β π΄)) = π΅) |
331 | | id 22 |
. . . . . . . . . . . 12
β’ ((πΈβπ) = π΅ β (πΈβπ) = π΅) |
332 | 331 | eqcomd 2739 |
. . . . . . . . . . 11
β’ ((πΈβπ) = π΅ β π΅ = (πΈβπ)) |
333 | 332 | adantl 483 |
. . . . . . . . . 10
β’ ((π β§ (πΈβπ) = π΅) β π΅ = (πΈβπ)) |
334 | 327, 330,
333 | 3eqtrrd 2778 |
. . . . . . . . 9
β’ ((π β§ (πΈβπ) = π΅) β (πΈβπ) = (π΄ + π)) |
335 | 334 | oveq1d 7421 |
. . . . . . . 8
β’ ((π β§ (πΈβπ) = π΅) β ((πΈβπ) β π) = ((π΄ + π) β π)) |
336 | 33 | adantr 482 |
. . . . . . . 8
β’ ((π β§ (πΈβπ) = π΅) β (πβ0) = π΄) |
337 | 325, 335,
336 | 3eqtr4rd 2784 |
. . . . . . 7
β’ ((π β§ (πΈβπ) = π΅) β (πβ0) = ((πΈβπ) β π)) |
338 | 337 | oveq1d 7421 |
. . . . . 6
β’ ((π β§ (πΈβπ) = π΅) β ((πβ0) β ((πβπ) β π)) = (((πΈβπ) β π) β ((πβπ) β π))) |
339 | 136 | recnd 11239 |
. . . . . . . 8
β’ (π β (πΈβπ) β β) |
340 | 339, 214,
222 | nnncan2d 11603 |
. . . . . . 7
β’ (π β (((πΈβπ) β π) β ((πβπ) β π)) = ((πΈβπ) β (πβπ))) |
341 | 340 | adantr 482 |
. . . . . 6
β’ ((π β§ (πΈβπ) = π΅) β (((πΈβπ) β π) β ((πβπ) β π)) = ((πΈβπ) β (πβπ))) |
342 | 216 | adantr 482 |
. . . . . 6
β’ ((π β§ (πΈβπ) = π΅) β ((πΈβπ) β (πβπ)) = π) |
343 | 338, 341,
342 | 3eqtrrd 2778 |
. . . . 5
β’ ((π β§ (πΈβπ) = π΅) β π = ((πβ0) β ((πβπ) β π))) |
344 | 33, 38 | eqeltrd 2834 |
. . . . . . 7
β’ (π β (πβ0) β β) |
345 | 3 | nngt0d 12258 |
. . . . . . . . . 10
β’ (π β 0 < π) |
346 | | fzolb 13635 |
. . . . . . . . . 10
β’ (0 β
(0..^π) β (0 β
β€ β§ π β
β€ β§ 0 < π)) |
347 | 312, 313,
345, 346 | syl3anbrc 1344 |
. . . . . . . . 9
β’ (π β 0 β (0..^π)) |
348 | | 0re 11213 |
. . . . . . . . . 10
β’ 0 β
β |
349 | | eleq1 2822 |
. . . . . . . . . . . . 13
β’ (π = 0 β (π β (0..^π) β 0 β (0..^π))) |
350 | 349 | anbi2d 630 |
. . . . . . . . . . . 12
β’ (π = 0 β ((π β§ π β (0..^π)) β (π β§ 0 β (0..^π)))) |
351 | | fveq2 6889 |
. . . . . . . . . . . . 13
β’ (π = 0 β (πβπ) = (πβ0)) |
352 | | oveq1 7413 |
. . . . . . . . . . . . . 14
β’ (π = 0 β (π + 1) = (0 + 1)) |
353 | 352 | fveq2d 6893 |
. . . . . . . . . . . . 13
β’ (π = 0 β (πβ(π + 1)) = (πβ(0 + 1))) |
354 | 351, 353 | breq12d 5161 |
. . . . . . . . . . . 12
β’ (π = 0 β ((πβπ) < (πβ(π + 1)) β (πβ0) < (πβ(0 + 1)))) |
355 | 350, 354 | imbi12d 345 |
. . . . . . . . . . 11
β’ (π = 0 β (((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) β ((π β§ 0 β (0..^π)) β (πβ0) < (πβ(0 + 1))))) |
356 | 355, 149 | vtoclg 3557 |
. . . . . . . . . 10
β’ (0 β
β β ((π β§ 0
β (0..^π)) β
(πβ0) < (πβ(0 +
1)))) |
357 | 348, 356 | ax-mp 5 |
. . . . . . . . 9
β’ ((π β§ 0 β (0..^π)) β (πβ0) < (πβ(0 + 1))) |
358 | 347, 357 | mpdan 686 |
. . . . . . . 8
β’ (π β (πβ0) < (πβ(0 + 1))) |
359 | | 0p1e1 12331 |
. . . . . . . . . 10
β’ (0 + 1) =
1 |
360 | 359 | fveq2i 6892 |
. . . . . . . . 9
β’ (πβ(0 + 1)) = (πβ1) |
361 | 360 | a1i 11 |
. . . . . . . 8
β’ (π β (πβ(0 + 1)) = (πβ1)) |
362 | 358, 361 | breqtrd 5174 |
. . . . . . 7
β’ (π β (πβ0) < (πβ1)) |
363 | 344, 319,
320, 362 | ltsub1dd 11823 |
. . . . . 6
β’ (π β ((πβ0) β ((πβπ) β π)) < ((πβ1) β ((πβπ) β π))) |
364 | 363 | adantr 482 |
. . . . 5
β’ ((π β§ (πΈβπ) = π΅) β ((πβ0) β ((πβπ) β π)) < ((πβ1) β ((πβπ) β π))) |
365 | 343, 364 | eqbrtrd 5170 |
. . . 4
β’ ((π β§ (πΈβπ) = π΅) β π < ((πβ1) β ((πβπ) β π))) |
366 | | elioore 13351 |
. . . . . . . . 9
β’ (π¦ β (π(,)((πβ1) β ((πβπ) β π))) β π¦ β β) |
367 | 132 | eqcomd 2739 |
. . . . . . . . . . . . . . . 16
β’ (π β ((ββ((π΅ β π) / π)) Β· π) = (πβπ)) |
368 | 367 | negeqd 11451 |
. . . . . . . . . . . . . . 15
β’ (π β -((ββ((π΅ β π) / π)) Β· π) = -(πβπ)) |
369 | 223, 368 | eqtrd 2773 |
. . . . . . . . . . . . . 14
β’ (π β (-(ββ((π΅ β π) / π)) Β· π) = -(πβπ)) |
370 | 222 | mullidd 11229 |
. . . . . . . . . . . . . 14
β’ (π β (1 Β· π) = π) |
371 | 369, 370 | oveq12d 7424 |
. . . . . . . . . . . . 13
β’ (π β ((-(ββ((π΅ β π) / π)) Β· π) + (1 Β· π)) = (-(πβπ) + π)) |
372 | 221 | negcld 11555 |
. . . . . . . . . . . . . 14
β’ (π β -(ββ((π΅ β π) / π)) β β) |
373 | | 1cnd 11206 |
. . . . . . . . . . . . . 14
β’ (π β 1 β
β) |
374 | 372, 373,
222 | adddird 11236 |
. . . . . . . . . . . . 13
β’ (π β ((-(ββ((π΅ β π) / π)) + 1) Β· π) = ((-(ββ((π΅ β π) / π)) Β· π) + (1 Β· π))) |
375 | 214, 222 | negsubdid 11583 |
. . . . . . . . . . . . 13
β’ (π β -((πβπ) β π) = (-(πβπ) + π)) |
376 | 371, 374,
375 | 3eqtr4d 2783 |
. . . . . . . . . . . 12
β’ (π β ((-(ββ((π΅ β π) / π)) + 1) Β· π) = -((πβπ) β π)) |
377 | 376 | oveq2d 7422 |
. . . . . . . . . . 11
β’ (π β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) = ((π¦ + ((πβπ) β π)) + -((πβπ) β π))) |
378 | 377 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π¦ β β) β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) = ((π¦ + ((πβπ) β π)) + -((πβπ) β π))) |
379 | 320 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β β) β ((πβπ) β π) β β) |
380 | 226, 379 | readdcld 11240 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β β) β (π¦ + ((πβπ) β π)) β β) |
381 | 380 | recnd 11239 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β β) β (π¦ + ((πβπ) β π)) β β) |
382 | 379 | recnd 11239 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β β) β ((πβπ) β π) β β) |
383 | 381, 382 | negsubd 11574 |
. . . . . . . . . 10
β’ ((π β§ π¦ β β) β ((π¦ + ((πβπ) β π)) + -((πβπ) β π)) = ((π¦ + ((πβπ) β π)) β ((πβπ) β π))) |
384 | 232, 382 | pncand 11569 |
. . . . . . . . . 10
β’ ((π β§ π¦ β β) β ((π¦ + ((πβπ) β π)) β ((πβπ) β π)) = π¦) |
385 | 378, 383,
384 | 3eqtrrd 2778 |
. . . . . . . . 9
β’ ((π β§ π¦ β β) β π¦ = ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π))) |
386 | 366, 385 | sylan2 594 |
. . . . . . . 8
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ = ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π))) |
387 | 386 | adantlr 714 |
. . . . . . 7
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ = ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π))) |
388 | | simpll 766 |
. . . . . . . 8
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π) |
389 | 361 | eqcomd 2739 |
. . . . . . . . . . . 12
β’ (π β (πβ1) = (πβ(0 + 1))) |
390 | 389 | oveq2d 7422 |
. . . . . . . . . . 11
β’ (π β ((πβ0)(,)(πβ1)) = ((πβ0)(,)(πβ(0 + 1)))) |
391 | 351, 353 | oveq12d 7424 |
. . . . . . . . . . . . . . . 16
β’ (π = 0 β ((πβπ)(,)(πβ(π + 1))) = ((πβ0)(,)(πβ(0 + 1)))) |
392 | 391 | sseq1d 4013 |
. . . . . . . . . . . . . . 15
β’ (π = 0 β (((πβπ)(,)(πβ(π + 1))) β π· β ((πβ0)(,)(πβ(0 + 1))) β π·)) |
393 | 350, 392 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π = 0 β (((π β§ π β (0..^π)) β ((πβπ)(,)(πβ(π + 1))) β π·) β ((π β§ 0 β (0..^π)) β ((πβ0)(,)(πβ(0 + 1))) β π·))) |
394 | 393, 238 | vtoclg 3557 |
. . . . . . . . . . . . 13
β’ (0 β
β β ((π β§ 0
β (0..^π)) β
((πβ0)(,)(πβ(0 + 1))) β π·)) |
395 | 348, 394 | ax-mp 5 |
. . . . . . . . . . . 12
β’ ((π β§ 0 β (0..^π)) β ((πβ0)(,)(πβ(0 + 1))) β π·) |
396 | 347, 395 | mpdan 686 |
. . . . . . . . . . 11
β’ (π β ((πβ0)(,)(πβ(0 + 1))) β π·) |
397 | 390, 396 | eqsstrd 4020 |
. . . . . . . . . 10
β’ (π β ((πβ0)(,)(πβ1)) β π·) |
398 | 397 | ad2antrr 725 |
. . . . . . . . 9
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β ((πβ0)(,)(πβ1)) β π·) |
399 | 33, 39 | eqeltrd 2834 |
. . . . . . . . . . 11
β’ (π β (πβ0) β
β*) |
400 | 399 | ad2antrr 725 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (πβ0) β
β*) |
401 | 319 | rexrd 11261 |
. . . . . . . . . . 11
β’ (π β (πβ1) β
β*) |
402 | 401 | ad2antrr 725 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (πβ1) β
β*) |
403 | 366, 380 | sylan2 594 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) β β) |
404 | 403 | adantlr 714 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) β β) |
405 | 339, 213,
214 | subaddd 11586 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((πΈβπ) β π) = (πβπ) β (π + (πβπ)) = (πΈβπ))) |
406 | 269, 405 | mpbird 257 |
. . . . . . . . . . . . . . . 16
β’ (π β ((πΈβπ) β π) = (πβπ)) |
407 | | oveq1 7413 |
. . . . . . . . . . . . . . . 16
β’ ((πΈβπ) = π΅ β ((πΈβπ) β π) = (π΅ β π)) |
408 | 406, 407 | sylan9req 2794 |
. . . . . . . . . . . . . . 15
β’ ((π β§ (πΈβπ) = π΅) β (πβπ) = (π΅ β π)) |
409 | 408 | oveq1d 7421 |
. . . . . . . . . . . . . 14
β’ ((π β§ (πΈβπ) = π΅) β ((πβπ) β π) = ((π΅ β π) β π)) |
410 | 409 | oveq2d 7422 |
. . . . . . . . . . . . 13
β’ ((π β§ (πΈβπ) = π΅) β (π + ((πβπ) β π)) = (π + ((π΅ β π) β π))) |
411 | 127 | recnd 11239 |
. . . . . . . . . . . . . . . 16
β’ (π β (π΅ β π) β β) |
412 | 213, 411,
222 | addsubassd 11588 |
. . . . . . . . . . . . . . 15
β’ (π β ((π + (π΅ β π)) β π) = (π + ((π΅ β π) β π))) |
413 | 412 | eqcomd 2739 |
. . . . . . . . . . . . . 14
β’ (π β (π + ((π΅ β π) β π)) = ((π + (π΅ β π)) β π)) |
414 | 413 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ (πΈβπ) = π΅) β (π + ((π΅ β π) β π)) = ((π + (π΅ β π)) β π)) |
415 | 328, 222,
323 | subsub23d 43984 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π΅ β π) = π΄ β (π΅ β π΄) = π)) |
416 | 58, 415 | mpbird 257 |
. . . . . . . . . . . . . . 15
β’ (π β (π΅ β π) = π΄) |
417 | 213, 328 | pncan3d 11571 |
. . . . . . . . . . . . . . . 16
β’ (π β (π + (π΅ β π)) = π΅) |
418 | 417 | oveq1d 7421 |
. . . . . . . . . . . . . . 15
β’ (π β ((π + (π΅ β π)) β π) = (π΅ β π)) |
419 | 416, 418,
33 | 3eqtr4d 2783 |
. . . . . . . . . . . . . 14
β’ (π β ((π + (π΅ β π)) β π) = (πβ0)) |
420 | 419 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ (πΈβπ) = π΅) β ((π + (π΅ β π)) β π) = (πβ0)) |
421 | 410, 414,
420 | 3eqtrrd 2778 |
. . . . . . . . . . . 12
β’ ((π β§ (πΈβπ) = π΅) β (πβ0) = (π + ((πβπ) β π))) |
422 | 421 | adantr 482 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (πβ0) = (π + ((πβπ) β π))) |
423 | 74 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π β β) |
424 | 366 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ β β) |
425 | 320 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β ((πβπ) β π) β β) |
426 | 251 | adantr 482 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π β
β*) |
427 | 321 | rexrd 11261 |
. . . . . . . . . . . . . . 15
β’ (π β ((πβ1) β ((πβπ) β π)) β
β*) |
428 | 427 | adantr 482 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β ((πβ1) β ((πβπ) β π)) β
β*) |
429 | | simpr 486 |
. . . . . . . . . . . . . 14
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ β (π(,)((πβ1) β ((πβπ) β π)))) |
430 | | ioogtlb 44195 |
. . . . . . . . . . . . . 14
β’ ((π β β*
β§ ((πβ1) β
((πβπ) β π)) β β* β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π < π¦) |
431 | 426, 428,
429, 430 | syl3anc 1372 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π < π¦) |
432 | 423, 424,
425, 431 | ltadd1dd 11822 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π + ((πβπ) β π)) < (π¦ + ((πβπ) β π))) |
433 | 432 | adantlr 714 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π + ((πβπ) β π)) < (π¦ + ((πβπ) β π))) |
434 | 422, 433 | eqbrtrd 5170 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (πβ0) < (π¦ + ((πβπ) β π))) |
435 | | iooltub 44210 |
. . . . . . . . . . . . 13
β’ ((π β β*
β§ ((πβ1) β
((πβπ) β π)) β β* β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ < ((πβ1) β ((πβπ) β π))) |
436 | 426, 428,
429, 435 | syl3anc 1372 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ < ((πβ1) β ((πβπ) β π))) |
437 | 319 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (πβ1) β β) |
438 | 424, 425,
437 | ltaddsubd 11811 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β ((π¦ + ((πβπ) β π)) < (πβ1) β π¦ < ((πβ1) β ((πβπ) β π)))) |
439 | 436, 438 | mpbird 257 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) < (πβ1)) |
440 | 439 | adantlr 714 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) < (πβ1)) |
441 | 400, 402,
404, 434, 440 | eliood 44198 |
. . . . . . . . 9
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) β ((πβ0)(,)(πβ1))) |
442 | 398, 441 | sseldd 3983 |
. . . . . . . 8
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (π¦ + ((πβπ) β π)) β π·) |
443 | 129 | znegcld 12665 |
. . . . . . . . . 10
β’ (π β -(ββ((π΅ β π) / π)) β β€) |
444 | 443 | peano2zd 12666 |
. . . . . . . . 9
β’ (π β (-(ββ((π΅ β π) / π)) + 1) β β€) |
445 | 444 | ad2antrr 725 |
. . . . . . . 8
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β (-(ββ((π΅ β π) / π)) + 1) β β€) |
446 | | ovex 7439 |
. . . . . . . . 9
β’
(-(ββ((π΅
β π) / π)) + 1) β
V |
447 | | eleq1 2822 |
. . . . . . . . . . 11
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β (π β β€ β
(-(ββ((π΅
β π) / π)) + 1) β
β€)) |
448 | 447 | 3anbi3d 1443 |
. . . . . . . . . 10
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β ((π β§ (π¦ + ((πβπ) β π)) β π· β§ π β β€) β (π β§ (π¦ + ((πβπ) β π)) β π· β§ (-(ββ((π΅ β π) / π)) + 1) β β€))) |
449 | | oveq1 7413 |
. . . . . . . . . . . 12
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β (π Β· π) = ((-(ββ((π΅ β π) / π)) + 1) Β· π)) |
450 | 449 | oveq2d 7422 |
. . . . . . . . . . 11
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β ((π¦ + ((πβπ) β π)) + (π Β· π)) = ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π))) |
451 | 450 | eleq1d 2819 |
. . . . . . . . . 10
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β (((π¦ + ((πβπ) β π)) + (π Β· π)) β π· β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) β π·)) |
452 | 448, 451 | imbi12d 345 |
. . . . . . . . 9
β’ (π = (-(ββ((π΅ β π) / π)) + 1) β (((π β§ (π¦ + ((πβπ) β π)) β π· β§ π β β€) β ((π¦ + ((πβπ) β π)) + (π Β· π)) β π·) β ((π β§ (π¦ + ((πβπ) β π)) β π· β§ (-(ββ((π΅ β π) / π)) + 1) β β€) β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) β π·))) |
453 | | ovex 7439 |
. . . . . . . . . 10
β’ (π¦ + ((πβπ) β π)) β V |
454 | | eleq1 2822 |
. . . . . . . . . . . 12
β’ (π₯ = (π¦ + ((πβπ) β π)) β (π₯ β π· β (π¦ + ((πβπ) β π)) β π·)) |
455 | 454 | 3anbi2d 1442 |
. . . . . . . . . . 11
β’ (π₯ = (π¦ + ((πβπ) β π)) β ((π β§ π₯ β π· β§ π β β€) β (π β§ (π¦ + ((πβπ) β π)) β π· β§ π β β€))) |
456 | | oveq1 7413 |
. . . . . . . . . . . 12
β’ (π₯ = (π¦ + ((πβπ) β π)) β (π₯ + (π Β· π)) = ((π¦ + ((πβπ) β π)) + (π Β· π))) |
457 | 456 | eleq1d 2819 |
. . . . . . . . . . 11
β’ (π₯ = (π¦ + ((πβπ) β π)) β ((π₯ + (π Β· π)) β π· β ((π¦ + ((πβπ) β π)) + (π Β· π)) β π·)) |
458 | 455, 457 | imbi12d 345 |
. . . . . . . . . 10
β’ (π₯ = (π¦ + ((πβπ) β π)) β (((π β§ π₯ β π· β§ π β β€) β (π₯ + (π Β· π)) β π·) β ((π β§ (π¦ + ((πβπ) β π)) β π· β§ π β β€) β ((π¦ + ((πβπ) β π)) + (π Β· π)) β π·))) |
459 | 453, 458,
295 | vtocl 3550 |
. . . . . . . . 9
β’ ((π β§ (π¦ + ((πβπ) β π)) β π· β§ π β β€) β ((π¦ + ((πβπ) β π)) + (π Β· π)) β π·) |
460 | 446, 452,
459 | vtocl 3550 |
. . . . . . . 8
β’ ((π β§ (π¦ + ((πβπ) β π)) β π· β§ (-(ββ((π΅ β π) / π)) + 1) β β€) β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) β π·) |
461 | 388, 442,
445, 460 | syl3anc 1372 |
. . . . . . 7
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β ((π¦ + ((πβπ) β π)) + ((-(ββ((π΅ β π) / π)) + 1) Β· π)) β π·) |
462 | 387, 461 | eqeltrd 2834 |
. . . . . 6
β’ (((π β§ (πΈβπ) = π΅) β§ π¦ β (π(,)((πβ1) β ((πβπ) β π)))) β π¦ β π·) |
463 | 462 | ralrimiva 3147 |
. . . . 5
β’ ((π β§ (πΈβπ) = π΅) β βπ¦ β (π(,)((πβ1) β ((πβπ) β π)))π¦ β π·) |
464 | | dfss3 3970 |
. . . . 5
β’ ((π(,)((πβ1) β ((πβπ) β π))) β π· β βπ¦ β (π(,)((πβ1) β ((πβπ) β π)))π¦ β π·) |
465 | 463, 464 | sylibr 233 |
. . . 4
β’ ((π β§ (πΈβπ) = π΅) β (π(,)((πβ1) β ((πβπ) β π))) β π·) |
466 | | breq2 5152 |
. . . . . 6
β’ (π¦ = ((πβ1) β ((πβπ) β π)) β (π < π¦ β π < ((πβ1) β ((πβπ) β π)))) |
467 | | oveq2 7414 |
. . . . . . 7
β’ (π¦ = ((πβ1) β ((πβπ) β π)) β (π(,)π¦) = (π(,)((πβ1) β ((πβπ) β π)))) |
468 | 467 | sseq1d 4013 |
. . . . . 6
β’ (π¦ = ((πβ1) β ((πβπ) β π)) β ((π(,)π¦) β π· β (π(,)((πβ1) β ((πβπ) β π))) β π·)) |
469 | 466, 468 | anbi12d 632 |
. . . . 5
β’ (π¦ = ((πβ1) β ((πβπ) β π)) β ((π < π¦ β§ (π(,)π¦) β π·) β (π < ((πβ1) β ((πβπ) β π)) β§ (π(,)((πβ1) β ((πβπ) β π))) β π·))) |
470 | 469 | rspcev 3613 |
. . . 4
β’ ((((πβ1) β ((πβπ) β π)) β β β§ (π < ((πβ1) β ((πβπ) β π)) β§ (π(,)((πβ1) β ((πβπ) β π))) β π·)) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
471 | 322, 365,
465, 470 | syl12anc 836 |
. . 3
β’ ((π β§ (πΈβπ) = π΅) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
472 | 15 | adantlr 714 |
. . . . . 6
β’ (((π β§ (πΈβπ) β π΅) β§ (πΈβπ) β ran π) β βπ β (0...π)(πβπ) = (πΈβπ)) |
473 | | simp2 1138 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β (0...π)) |
474 | 25 | 3ad2ant2 1135 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β β) |
475 | 94 | 3ad2ant2 1135 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β β) |
476 | 96 | 3ad2ant2 1135 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β€ π) |
477 | | id 22 |
. . . . . . . . . . . . . . . . . 18
β’ ((πβπ) = (πΈβπ) β (πβπ) = (πΈβπ)) |
478 | 477 | eqcomd 2739 |
. . . . . . . . . . . . . . . . 17
β’ ((πβπ) = (πΈβπ) β (πΈβπ) = (πβπ)) |
479 | 478 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((πβπ) = (πΈβπ) β§ π = π) β (πΈβπ) = (πβπ)) |
480 | 479 | 3ad2antl3 1188 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ π = π) β (πΈβπ) = (πβπ)) |
481 | | fveq2 6889 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (πβπ) = (πβπ)) |
482 | 481 | eqcomd 2739 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (πβπ) = (πβπ)) |
483 | 482 | adantl 483 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ π = π) β (πβπ) = (πβπ)) |
484 | 177 | ad2antrr 725 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ (πΈβπ) β π΅) β§ π = π) β (πβπ) = π΅) |
485 | 484 | 3ad2antl1 1186 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ π = π) β (πβπ) = π΅) |
486 | 480, 483,
485 | 3eqtrd 2777 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ π = π) β (πΈβπ) = π΅) |
487 | | neneq 2947 |
. . . . . . . . . . . . . . . 16
β’ ((πΈβπ) β π΅ β Β¬ (πΈβπ) = π΅) |
488 | 487 | ad2antlr 726 |
. . . . . . . . . . . . . . 15
β’ (((π β§ (πΈβπ) β π΅) β§ π = π) β Β¬ (πΈβπ) = π΅) |
489 | 488 | 3ad2antl1 1186 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β§ π = π) β Β¬ (πΈβπ) = π΅) |
490 | 486, 489 | pm2.65da 816 |
. . . . . . . . . . . . 13
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β Β¬ π = π) |
491 | 490 | neqned 2948 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β π) |
492 | 474, 475,
476, 491 | leneltd 11365 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π < π) |
493 | | elfzfzo 43973 |
. . . . . . . . . . 11
β’ (π β (0..^π) β (π β (0...π) β§ π < π)) |
494 | 473, 492,
493 | sylanbrc 584 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π β (0..^π)) |
495 | 114 | adantlr 714 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π)) β (πβπ) β
β*) |
496 | 495 | 3adant3 1133 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβπ) β
β*) |
497 | | simp1l 1198 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β π) |
498 | 101 | adantr 482 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β π:(0...π)βΆβ) |
499 | | fzofzp1 13726 |
. . . . . . . . . . . . . . 15
β’ (π β (0..^π) β (π + 1) β (0...π)) |
500 | 499 | adantl 483 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β (π + 1) β (0...π)) |
501 | 498, 500 | ffvelcdmd 7085 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β β) |
502 | 501 | rexrd 11261 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β
β*) |
503 | 497, 494,
502 | syl2anc 585 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβ(π + 1)) β
β*) |
504 | 138 | 3adant1r 1178 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β
β*) |
505 | 37, 157 | eqbrtrd 5170 |
. . . . . . . . . . . . 13
β’ ((π β§ (πβπ) = (πΈβπ)) β (πβπ) β€ (πΈβπ)) |
506 | 505 | adantlr 714 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ (πβπ) = (πΈβπ)) β (πβπ) β€ (πΈβπ)) |
507 | 506 | 3adant2 1132 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβπ) β€ (πΈβπ)) |
508 | 478 | 3ad2ant3 1136 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) = (πβπ)) |
509 | | eleq1 2822 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (π β (0..^π) β π β (0..^π))) |
510 | 509 | anbi2d 630 |
. . . . . . . . . . . . . . 15
β’ (π = π β ((π β§ π β (0..^π)) β (π β§ π β (0..^π)))) |
511 | | fveq2 6889 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (πβπ) = (πβπ)) |
512 | | oveq1 7413 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (π + 1) = (π + 1)) |
513 | 512 | fveq2d 6893 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (πβ(π + 1)) = (πβ(π + 1))) |
514 | 511, 513 | breq12d 5161 |
. . . . . . . . . . . . . . 15
β’ (π = π β ((πβπ) < (πβ(π + 1)) β (πβπ) < (πβ(π + 1)))) |
515 | 510, 514 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π = π β (((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) β ((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))))) |
516 | 515, 149 | chvarvv 2003 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) |
517 | 497, 494,
516 | syl2anc 585 |
. . . . . . . . . . . 12
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πβπ) < (πβ(π + 1))) |
518 | 508, 517 | eqbrtrd 5170 |
. . . . . . . . . . 11
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) < (πβ(π + 1))) |
519 | 496, 503,
504, 507, 518 | elicod 13371 |
. . . . . . . . . 10
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
520 | 511, 513 | oveq12d 7424 |
. . . . . . . . . . . 12
β’ (π = π β ((πβπ)[,)(πβ(π + 1))) = ((πβπ)[,)(πβ(π + 1)))) |
521 | 520 | eleq2d 2820 |
. . . . . . . . . . 11
β’ (π = π β ((πΈβπ) β ((πβπ)[,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1))))) |
522 | 521 | rspcev 3613 |
. . . . . . . . . 10
β’ ((π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
523 | 494, 519,
522 | syl2anc 585 |
. . . . . . . . 9
β’ (((π β§ (πΈβπ) β π΅) β§ π β (0...π) β§ (πβπ) = (πΈβπ)) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
524 | 523 | 3exp 1120 |
. . . . . . . 8
β’ ((π β§ (πΈβπ) β π΅) β (π β (0...π) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))))) |
525 | 524 | adantr 482 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β π΅) β§ (πΈβπ) β ran π) β (π β (0...π) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))))) |
526 | 525 | rexlimdv 3154 |
. . . . . 6
β’ (((π β§ (πΈβπ) β π΅) β§ (πΈβπ) β ran π) β (βπ β (0...π)(πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1))))) |
527 | 472, 526 | mpd 15 |
. . . . 5
β’ (((π β§ (πΈβπ) β π΅) β§ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
528 | | ioossico 13412 |
. . . . . . . . . . 11
β’ ((πβπ)(,)(πβ(π + 1))) β ((πβπ)[,)(πβ(π + 1))) |
529 | | simpr 486 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π)) β§ (πΈβπ) β ((πβπ)(,)(πβ(π + 1)))) β (πΈβπ) β ((πβπ)(,)(πβ(π + 1)))) |
530 | 528, 529 | sselid 3980 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π)) β§ (πΈβπ) β ((πβπ)(,)(πβ(π + 1)))) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
531 | 530 | ex 414 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β ((πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1))))) |
532 | 531 | adantlr 714 |
. . . . . . . 8
β’ (((π β§ Β¬ (πΈβπ) β ran π) β§ π β (0..^π)) β ((πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1))))) |
533 | 532 | reximdva 3169 |
. . . . . . 7
β’ ((π β§ Β¬ (πΈβπ) β ran π) β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1))))) |
534 | 187, 533 | mpd 15 |
. . . . . 6
β’ ((π β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
535 | 534 | adantlr 714 |
. . . . 5
β’ (((π β§ (πΈβπ) β π΅) β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
536 | 527, 535 | pm2.61dan 812 |
. . . 4
β’ ((π β§ (πΈβπ) β π΅) β βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
537 | 205, 247 | resubcld 11639 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β ((πβ(π + 1)) β (πβπ)) β β) |
538 | 537 | 3adant3 1133 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β ((πβ(π + 1)) β (πβπ)) β β) |
539 | 216 | eqcomd 2739 |
. . . . . . . . . 10
β’ (π β π = ((πΈβπ) β (πβπ))) |
540 | 539 | 3ad2ant1 1134 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β π = ((πΈβπ) β (πβπ))) |
541 | 136 | 3ad2ant1 1134 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πΈβπ) β β) |
542 | 205 | 3adant3 1133 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβ(π + 1)) β β) |
543 | 133 | 3ad2ant1 1134 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβπ) β β) |
544 | 197 | rexrd 11261 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β (πβπ) β
β*) |
545 | 544 | 3adant3 1133 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβπ) β
β*) |
546 | 206 | 3adant3 1133 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβ(π + 1)) β
β*) |
547 | | simp3 1139 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) |
548 | | icoltub 44208 |
. . . . . . . . . . 11
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πΈβπ) < (πβ(π + 1))) |
549 | 545, 546,
547, 548 | syl3anc 1372 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πΈβπ) < (πβ(π + 1))) |
550 | 541, 542,
543, 549 | ltsub1dd 11823 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β ((πΈβπ) β (πβπ)) < ((πβ(π + 1)) β (πβπ))) |
551 | 540, 550 | eqbrtrd 5170 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β π < ((πβ(π + 1)) β (πβπ))) |
552 | | elioore 13351 |
. . . . . . . . . . . . 13
β’ (π¦ β (π(,)((πβ(π + 1)) β (πβπ))) β π¦ β β) |
553 | 552, 234 | sylan2 594 |
. . . . . . . . . . . 12
β’ ((π β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
554 | 553 | 3ad2antl1 1186 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
555 | | simpl1 1192 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π) |
556 | 238 | 3adant3 1133 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β ((πβπ)(,)(πβ(π + 1))) β π·) |
557 | 556 | adantr 482 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β ((πβπ)(,)(πβ(π + 1))) β π·) |
558 | 545 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) β
β*) |
559 | 546 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβ(π + 1)) β
β*) |
560 | 552 | adantl 483 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ β β) |
561 | 133 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) β β) |
562 | 560, 561 | readdcld 11240 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) β β) |
563 | 562 | 3ad2antl1 1186 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) β β) |
564 | 197 | 3adant3 1133 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβπ) β β) |
565 | 564 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) β β) |
566 | 555, 136 | syl 17 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πΈβπ) β β) |
567 | | icogelb 13372 |
. . . . . . . . . . . . . . . . 17
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβπ) β€ (πΈβπ)) |
568 | 545, 546,
547, 567 | syl3anc 1372 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (πβπ) β€ (πΈβπ)) |
569 | 568 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) β€ (πΈβπ)) |
570 | 135 | ad2antrr 725 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πΈβπ) = (π + (πβπ))) |
571 | 74 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π β β) |
572 | 552 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ β β) |
573 | 133 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) β β) |
574 | 251 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π β
β*) |
575 | 537 | rexrd 11261 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π β (0..^π)) β ((πβ(π + 1)) β (πβπ)) β
β*) |
576 | 575 | adantr 482 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β ((πβ(π + 1)) β (πβπ)) β
β*) |
577 | | simpr 486 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) |
578 | | ioogtlb 44195 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β β*
β§ ((πβ(π + 1)) β (πβπ)) β β* β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π < π¦) |
579 | 574, 576,
577, 578 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π < π¦) |
580 | 571, 572,
573, 579 | ltadd1dd 11822 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π + (πβπ)) < (π¦ + (πβπ))) |
581 | 570, 580 | eqbrtrd 5170 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πΈβπ) < (π¦ + (πβπ))) |
582 | 581 | 3adantl3 1169 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πΈβπ) < (π¦ + (πβπ))) |
583 | 565, 566,
563, 569, 582 | lelttrd 11369 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (πβπ) < (π¦ + (πβπ))) |
584 | 537 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β ((πβ(π + 1)) β (πβπ)) β β) |
585 | | iooltub 44210 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β β*
β§ ((πβ(π + 1)) β (πβπ)) β β* β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ < ((πβ(π + 1)) β (πβπ))) |
586 | 574, 576,
577, 585 | syl3anc 1372 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ < ((πβ(π + 1)) β (πβπ))) |
587 | 572, 584,
573, 586 | ltadd1dd 11822 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) < (((πβ(π + 1)) β (πβπ)) + (πβπ))) |
588 | 205 | recnd 11239 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β β) |
589 | 214 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
590 | 588, 589 | npcand 11572 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β (0..^π)) β (((πβ(π + 1)) β (πβπ)) + (πβπ)) = (πβ(π + 1))) |
591 | 590 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (((πβ(π + 1)) β (πβπ)) + (πβπ)) = (πβ(π + 1))) |
592 | 587, 591 | breqtrd 5174 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) < (πβ(π + 1))) |
593 | 592 | 3adantl3 1169 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) < (πβ(π + 1))) |
594 | 558, 559,
563, 583, 593 | eliood 44198 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) β ((πβπ)(,)(πβ(π + 1)))) |
595 | 557, 594 | sseldd 3983 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β (π¦ + (πβπ)) β π·) |
596 | 555, 443 | syl 17 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β -(ββ((π΅ β π) / π)) β β€) |
597 | 555, 595,
596, 297 | syl3anc 1372 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·) |
598 | 554, 597 | eqeltrd 2834 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β§ π¦ β (π(,)((πβ(π + 1)) β (πβπ)))) β π¦ β π·) |
599 | 598 | ralrimiva 3147 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β βπ¦ β (π(,)((πβ(π + 1)) β (πβπ)))π¦ β π·) |
600 | | dfss3 3970 |
. . . . . . . . 9
β’ ((π(,)((πβ(π + 1)) β (πβπ))) β π· β βπ¦ β (π(,)((πβ(π + 1)) β (πβπ)))π¦ β π·) |
601 | 599, 600 | sylibr 233 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β (π(,)((πβ(π + 1)) β (πβπ))) β π·) |
602 | | breq2 5152 |
. . . . . . . . . 10
β’ (π¦ = ((πβ(π + 1)) β (πβπ)) β (π < π¦ β π < ((πβ(π + 1)) β (πβπ)))) |
603 | | oveq2 7414 |
. . . . . . . . . . 11
β’ (π¦ = ((πβ(π + 1)) β (πβπ)) β (π(,)π¦) = (π(,)((πβ(π + 1)) β (πβπ)))) |
604 | 603 | sseq1d 4013 |
. . . . . . . . . 10
β’ (π¦ = ((πβ(π + 1)) β (πβπ)) β ((π(,)π¦) β π· β (π(,)((πβ(π + 1)) β (πβπ))) β π·)) |
605 | 602, 604 | anbi12d 632 |
. . . . . . . . 9
β’ (π¦ = ((πβ(π + 1)) β (πβπ)) β ((π < π¦ β§ (π(,)π¦) β π·) β (π < ((πβ(π + 1)) β (πβπ)) β§ (π(,)((πβ(π + 1)) β (πβπ))) β π·))) |
606 | 605 | rspcev 3613 |
. . . . . . . 8
β’ ((((πβ(π + 1)) β (πβπ)) β β β§ (π < ((πβ(π + 1)) β (πβπ)) β§ (π(,)((πβ(π + 1)) β (πβπ))) β π·)) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
607 | 538, 551,
601, 606 | syl12anc 836 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)[,)(πβ(π + 1)))) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
608 | 607 | 3exp 1120 |
. . . . . 6
β’ (π β (π β (0..^π) β ((πΈβπ) β ((πβπ)[,)(πβ(π + 1))) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)))) |
609 | 608 | adantr 482 |
. . . . 5
β’ ((π β§ (πΈβπ) β π΅) β (π β (0..^π) β ((πΈβπ) β ((πβπ)[,)(πβ(π + 1))) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)))) |
610 | 609 | rexlimdv 3154 |
. . . 4
β’ ((π β§ (πΈβπ) β π΅) β (βπ β (0..^π)(πΈβπ) β ((πβπ)[,)(πβ(π + 1))) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·))) |
611 | 536, 610 | mpd 15 |
. . 3
β’ ((π β§ (πΈβπ) β π΅) β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
612 | 471, 611 | pm2.61dane 3030 |
. 2
β’ (π β βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·)) |
613 | 311, 612 | jca 513 |
1
β’ (π β (βπ¦ β β (π¦ < π β§ (π¦(,)π) β π·) β§ βπ¦ β β (π < π¦ β§ (π(,)π¦) β π·))) |