Step | Hyp | Ref
| Expression |
1 | | fourierdlem49.a |
. . . . . 6
β’ (π β π΄ β β) |
2 | | fourierdlem49.b |
. . . . . 6
β’ (π β π΅ β β) |
3 | | fourierdlem49.altb |
. . . . . 6
β’ (π β π΄ < π΅) |
4 | | fourierdlem49.t |
. . . . . 6
β’ π = (π΅ β π΄) |
5 | | fourierdlem49.e |
. . . . . . 7
β’ πΈ = (π₯ β β β¦ (π₯ + (πβπ₯))) |
6 | | ovex 7438 |
. . . . . . . . . 10
β’
((ββ((π΅
β π₯) / π)) Β· π) β V |
7 | | fourierdlem49.z |
. . . . . . . . . . 11
β’ π = (π₯ β β β¦
((ββ((π΅ β
π₯) / π)) Β· π)) |
8 | 7 | fvmpt2 7006 |
. . . . . . . . . 10
β’ ((π₯ β β β§
((ββ((π΅ β
π₯) / π)) Β· π) β V) β (πβπ₯) = ((ββ((π΅ β π₯) / π)) Β· π)) |
9 | 6, 8 | mpan2 689 |
. . . . . . . . 9
β’ (π₯ β β β (πβπ₯) = ((ββ((π΅ β π₯) / π)) Β· π)) |
10 | 9 | oveq2d 7421 |
. . . . . . . 8
β’ (π₯ β β β (π₯ + (πβπ₯)) = (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) |
11 | 10 | mpteq2ia 5250 |
. . . . . . 7
β’ (π₯ β β β¦ (π₯ + (πβπ₯))) = (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) |
12 | 5, 11 | eqtri 2760 |
. . . . . 6
β’ πΈ = (π₯ β β β¦ (π₯ + ((ββ((π΅ β π₯) / π)) Β· π))) |
13 | 1, 2, 3, 4, 12 | fourierdlem4 44813 |
. . . . 5
β’ (π β πΈ:ββΆ(π΄(,]π΅)) |
14 | | fourierdlem49.x |
. . . . 5
β’ (π β π β β) |
15 | 13, 14 | ffvelcdmd 7084 |
. . . 4
β’ (π β (πΈβπ) β (π΄(,]π΅)) |
16 | | simpr 485 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β (πΈβπ) β ran π) |
17 | | fourierdlem49.q |
. . . . . . . . . . . . 13
β’ (π β π β (πβπ)) |
18 | | fourierdlem49.m |
. . . . . . . . . . . . . 14
β’ (π β π β β) |
19 | | fourierdlem49.p |
. . . . . . . . . . . . . . 15
β’ π = (π β β β¦ {π β (β βm
(0...π)) β£ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))}) |
20 | 19 | fourierdlem2 44811 |
. . . . . . . . . . . . . 14
β’ (π β β β (π β (πβπ) β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))))) |
21 | 18, 20 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β (π β (πβπ) β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1)))))) |
22 | 17, 21 | mpbid 231 |
. . . . . . . . . . . 12
β’ (π β (π β (β βm
(0...π)) β§ (((πβ0) = π΄ β§ (πβπ) = π΅) β§ βπ β (0..^π)(πβπ) < (πβ(π + 1))))) |
23 | 22 | simpld 495 |
. . . . . . . . . . 11
β’ (π β π β (β βm
(0...π))) |
24 | | elmapi 8839 |
. . . . . . . . . . 11
β’ (π β (β
βm (0...π))
β π:(0...π)βΆβ) |
25 | 23, 24 | syl 17 |
. . . . . . . . . 10
β’ (π β π:(0...π)βΆβ) |
26 | | ffn 6714 |
. . . . . . . . . 10
β’ (π:(0...π)βΆβ β π Fn (0...π)) |
27 | 25, 26 | syl 17 |
. . . . . . . . 9
β’ (π β π Fn (0...π)) |
28 | 27 | ad2antrr 724 |
. . . . . . . 8
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β π Fn (0...π)) |
29 | | fvelrnb 6949 |
. . . . . . . 8
β’ (π Fn (0...π) β ((πΈβπ) β ran π β βπ β (0...π)(πβπ) = (πΈβπ))) |
30 | 28, 29 | syl 17 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β ((πΈβπ) β ran π β βπ β (0...π)(πβπ) = (πΈβπ))) |
31 | 16, 30 | mpbid 231 |
. . . . . 6
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β βπ β (0...π)(πβπ) = (πΈβπ)) |
32 | | 1zzd 12589 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 1 β β€) |
33 | | elfzelz 13497 |
. . . . . . . . . . . . . . . 16
β’ (π β (0...π) β π β β€) |
34 | 33 | ad2antlr 725 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β β€) |
35 | | 1e0p1 12715 |
. . . . . . . . . . . . . . . . 17
β’ 1 = (0 +
1) |
36 | 35 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 1 = (0 + 1)) |
37 | 34 | zred 12662 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β β) |
38 | | elfzle1 13500 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (0...π) β 0 β€ π) |
39 | 38 | ad2antlr 725 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 0 β€ π) |
40 | | id 22 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((πβπ) = (πΈβπ) β (πβπ) = (πΈβπ)) |
41 | 40 | eqcomd 2738 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((πβπ) = (πΈβπ) β (πΈβπ) = (πβπ)) |
42 | 41 | ad2antlr 725 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πΈβπ) = (πβπ)) |
43 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = 0 β (πβπ) = (πβ0)) |
44 | 43 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πβπ) = (πβ0)) |
45 | 22 | simprld 770 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π β ((πβ0) = π΄ β§ (πβπ) = π΅)) |
46 | 45 | simpld 495 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β (πβ0) = π΄) |
47 | 46 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (((π β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πβ0) = π΄) |
48 | 42, 44, 47 | 3eqtrd 2776 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πΈβπ) = π΄) |
49 | 48 | adantllr 717 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πΈβπ) = π΄) |
50 | 49 | adantllr 717 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β§ π = 0) β (πΈβπ) = π΄) |
51 | 1 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β π΄ β β) |
52 | 1 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π β π΄ β
β*) |
53 | 52 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β π΄ β
β*) |
54 | 2 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π β π΅ β
β*) |
55 | 54 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β π΅ β
β*) |
56 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β (πΈβπ) β (π΄(,]π΅)) |
57 | | iocgtlb 44201 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β*
β§ π΅ β
β* β§ (πΈβπ) β (π΄(,]π΅)) β π΄ < (πΈβπ)) |
58 | 53, 55, 56, 57 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β π΄ < (πΈβπ)) |
59 | 51, 58 | gtned 11345 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β (πΈβπ) β π΄) |
60 | 59 | neneqd 2945 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β Β¬ (πΈβπ) = π΄) |
61 | 60 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β§ π = 0) β Β¬ (πΈβπ) = π΄) |
62 | 50, 61 | pm2.65da 815 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β Β¬ π = 0) |
63 | 62 | neqned 2947 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β 0) |
64 | 37, 39, 63 | ne0gt0d 11347 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 0 < π) |
65 | | 0zd 12566 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 0 β β€) |
66 | | zltp1le 12608 |
. . . . . . . . . . . . . . . . . 18
β’ ((0
β β€ β§ π
β β€) β (0 < π β (0 + 1) β€ π)) |
67 | 65, 34, 66 | syl2anc 584 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (0 < π β (0 + 1) β€ π)) |
68 | 64, 67 | mpbid 231 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (0 + 1) β€ π) |
69 | 36, 68 | eqbrtrd 5169 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 1 β€ π) |
70 | | eluz2 12824 |
. . . . . . . . . . . . . . 15
β’ (π β
(β€β₯β1) β (1 β β€ β§ π β β€ β§ 1 β€
π)) |
71 | 32, 34, 69, 70 | syl3anbrc 1343 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β
(β€β₯β1)) |
72 | | nnuz 12861 |
. . . . . . . . . . . . . 14
β’ β =
(β€β₯β1) |
73 | 71, 72 | eleqtrrdi 2844 |
. . . . . . . . . . . . 13
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β β) |
74 | | nnm1nn0 12509 |
. . . . . . . . . . . . 13
β’ (π β β β (π β 1) β
β0) |
75 | 73, 74 | syl 17 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β
β0) |
76 | | nn0uz 12860 |
. . . . . . . . . . . . 13
β’
β0 = (β€β₯β0) |
77 | 76 | a1i 11 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β β0 =
(β€β₯β0)) |
78 | 75, 77 | eleqtrd 2835 |
. . . . . . . . . . 11
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β
(β€β₯β0)) |
79 | 18 | nnzd 12581 |
. . . . . . . . . . . 12
β’ (π β π β β€) |
80 | 79 | ad3antrrr 728 |
. . . . . . . . . . 11
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π β β€) |
81 | | peano2zm 12601 |
. . . . . . . . . . . . . . 15
β’ (π β β€ β (π β 1) β
β€) |
82 | 33, 81 | syl 17 |
. . . . . . . . . . . . . 14
β’ (π β (0...π) β (π β 1) β β€) |
83 | 82 | zred 12662 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β (π β 1) β β) |
84 | 33 | zred 12662 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β π β β) |
85 | | elfzel2 13495 |
. . . . . . . . . . . . . 14
β’ (π β (0...π) β π β β€) |
86 | 85 | zred 12662 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β π β β) |
87 | 84 | ltm1d 12142 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β (π β 1) < π) |
88 | | elfzle2 13501 |
. . . . . . . . . . . . 13
β’ (π β (0...π) β π β€ π) |
89 | 83, 84, 86, 87, 88 | ltletrd 11370 |
. . . . . . . . . . . 12
β’ (π β (0...π) β (π β 1) < π) |
90 | 89 | ad2antlr 725 |
. . . . . . . . . . 11
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) < π) |
91 | | elfzo2 13631 |
. . . . . . . . . . 11
β’ ((π β 1) β (0..^π) β ((π β 1) β
(β€β₯β0) β§ π β β€ β§ (π β 1) < π)) |
92 | 78, 80, 90, 91 | syl3anbrc 1343 |
. . . . . . . . . 10
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β (0..^π)) |
93 | 25 | ad3antrrr 728 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π:(0...π)βΆβ) |
94 | 34, 81 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β β€) |
95 | 75 | nn0ge0d 12531 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β 0 β€ (π β 1)) |
96 | 83, 86, 89 | ltled 11358 |
. . . . . . . . . . . . . . . 16
β’ (π β (0...π) β (π β 1) β€ π) |
97 | 96 | ad2antlr 725 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β€ π) |
98 | 65, 80, 94, 95, 97 | elfzd 13488 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (π β 1) β (0...π)) |
99 | 93, 98 | ffvelcdmd 7084 |
. . . . . . . . . . . . 13
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) β β) |
100 | 99 | rexrd 11260 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) β
β*) |
101 | 25 | ffvelcdmda 7083 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (0...π)) β (πβπ) β β) |
102 | 101 | rexrd 11260 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0...π)) β (πβπ) β
β*) |
103 | 102 | adantlr 713 |
. . . . . . . . . . . . 13
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β (πβπ) β
β*) |
104 | 103 | adantr 481 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβπ) β
β*) |
105 | | iocssre 13400 |
. . . . . . . . . . . . . . . 16
β’ ((π΄ β β*
β§ π΅ β β)
β (π΄(,]π΅) β
β) |
106 | 52, 2, 105 | syl2anc 584 |
. . . . . . . . . . . . . . 15
β’ (π β (π΄(,]π΅) β β) |
107 | 106 | sselda 3981 |
. . . . . . . . . . . . . 14
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β (πΈβπ) β β) |
108 | 107 | rexrd 11260 |
. . . . . . . . . . . . 13
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β (πΈβπ) β
β*) |
109 | 108 | ad2antrr 724 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β
β*) |
110 | | simplll 773 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β π) |
111 | | ovex 7438 |
. . . . . . . . . . . . . . . 16
β’ (π β 1) β
V |
112 | | eleq1 2821 |
. . . . . . . . . . . . . . . . . 18
β’ (π = (π β 1) β (π β (0..^π) β (π β 1) β (0..^π))) |
113 | 112 | anbi2d 629 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π β 1) β ((π β§ π β (0..^π)) β (π β§ (π β 1) β (0..^π)))) |
114 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . 18
β’ (π = (π β 1) β (πβπ) = (πβ(π β 1))) |
115 | | oveq1 7412 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = (π β 1) β (π + 1) = ((π β 1) + 1)) |
116 | 115 | fveq2d 6892 |
. . . . . . . . . . . . . . . . . 18
β’ (π = (π β 1) β (πβ(π + 1)) = (πβ((π β 1) + 1))) |
117 | 114, 116 | breq12d 5160 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π β 1) β ((πβπ) < (πβ(π + 1)) β (πβ(π β 1)) < (πβ((π β 1) + 1)))) |
118 | 113, 117 | imbi12d 344 |
. . . . . . . . . . . . . . . 16
β’ (π = (π β 1) β (((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) β ((π β§ (π β 1) β (0..^π)) β (πβ(π β 1)) < (πβ((π β 1) + 1))))) |
119 | 22 | simprrd 772 |
. . . . . . . . . . . . . . . . 17
β’ (π β βπ β (0..^π)(πβπ) < (πβ(π + 1))) |
120 | 119 | r19.21bi 3248 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π)) β (πβπ) < (πβ(π + 1))) |
121 | 111, 118,
120 | vtocl 3549 |
. . . . . . . . . . . . . . 15
β’ ((π β§ (π β 1) β (0..^π)) β (πβ(π β 1)) < (πβ((π β 1) + 1))) |
122 | 110, 92, 121 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πβ((π β 1) + 1))) |
123 | 33 | zcnd 12663 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (0...π) β π β β) |
124 | | 1cnd 11205 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (0...π) β 1 β β) |
125 | 123, 124 | npcand 11571 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (0...π) β ((π β 1) + 1) = π) |
126 | 125 | eqcomd 2738 |
. . . . . . . . . . . . . . . . 17
β’ (π β (0...π) β π = ((π β 1) + 1)) |
127 | 126 | fveq2d 6892 |
. . . . . . . . . . . . . . . 16
β’ (π β (0...π) β (πβπ) = (πβ((π β 1) + 1))) |
128 | 127 | eqcomd 2738 |
. . . . . . . . . . . . . . 15
β’ (π β (0...π) β (πβ((π β 1) + 1)) = (πβπ)) |
129 | 128 | ad2antlr 725 |
. . . . . . . . . . . . . 14
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ((π β 1) + 1)) = (πβπ)) |
130 | 122, 129 | breqtrd 5173 |
. . . . . . . . . . . . 13
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πβπ)) |
131 | | simpr 485 |
. . . . . . . . . . . . 13
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβπ) = (πΈβπ)) |
132 | 130, 131 | breqtrd 5173 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πβ(π β 1)) < (πΈβπ)) |
133 | 106, 15 | sseldd 3982 |
. . . . . . . . . . . . . . . 16
β’ (π β (πΈβπ) β β) |
134 | 133 | leidd 11776 |
. . . . . . . . . . . . . . 15
β’ (π β (πΈβπ) β€ (πΈβπ)) |
135 | 134 | ad2antrr 724 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πΈβπ)) |
136 | 41 | adantl 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) = (πβπ)) |
137 | 135, 136 | breqtrd 5173 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πβπ)) |
138 | 137 | adantllr 717 |
. . . . . . . . . . . 12
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β€ (πβπ)) |
139 | 100, 104,
109, 132, 138 | eliocd 44206 |
. . . . . . . . . . 11
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β ((πβ(π β 1))(,](πβπ))) |
140 | 127 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ (π β (0...π) β ((πβ(π β 1))(,](πβπ)) = ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
141 | 140 | ad2antlr 725 |
. . . . . . . . . . 11
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β ((πβ(π β 1))(,](πβπ)) = ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
142 | 139, 141 | eleqtrd 2835 |
. . . . . . . . . 10
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
143 | 114, 116 | oveq12d 7423 |
. . . . . . . . . . . 12
β’ (π = (π β 1) β ((πβπ)(,](πβ(π + 1))) = ((πβ(π β 1))(,](πβ((π β 1) + 1)))) |
144 | 143 | eleq2d 2819 |
. . . . . . . . . . 11
β’ (π = (π β 1) β ((πΈβπ) β ((πβπ)(,](πβ(π + 1))) β (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1))))) |
145 | 144 | rspcev 3612 |
. . . . . . . . . 10
β’ (((π β 1) β (0..^π) β§ (πΈβπ) β ((πβ(π β 1))(,](πβ((π β 1) + 1)))) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
146 | 92, 142, 145 | syl2anc 584 |
. . . . . . . . 9
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β§ (πβπ) = (πΈβπ)) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
147 | 146 | ex 413 |
. . . . . . . 8
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ π β (0...π)) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
148 | 147 | adantlr 713 |
. . . . . . 7
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β§ π β (0...π)) β ((πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
149 | 148 | rexlimdva 3155 |
. . . . . 6
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β (βπ β (0...π)(πβπ) = (πΈβπ) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
150 | 31, 149 | mpd 15 |
. . . . 5
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
151 | 18 | ad2antrr 724 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β π β β) |
152 | 25 | ad2antrr 724 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β π:(0...π)βΆβ) |
153 | | iocssicc 13410 |
. . . . . . . . . 10
β’ (π΄(,]π΅) β (π΄[,]π΅) |
154 | 46 | eqcomd 2738 |
. . . . . . . . . . 11
β’ (π β π΄ = (πβ0)) |
155 | 45 | simprd 496 |
. . . . . . . . . . . 12
β’ (π β (πβπ) = π΅) |
156 | 155 | eqcomd 2738 |
. . . . . . . . . . 11
β’ (π β π΅ = (πβπ)) |
157 | 154, 156 | oveq12d 7423 |
. . . . . . . . . 10
β’ (π β (π΄[,]π΅) = ((πβ0)[,](πβπ))) |
158 | 153, 157 | sseqtrid 4033 |
. . . . . . . . 9
β’ (π β (π΄(,]π΅) β ((πβ0)[,](πβπ))) |
159 | 158 | sselda 3981 |
. . . . . . . 8
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β (πΈβπ) β ((πβ0)[,](πβπ))) |
160 | 159 | adantr 481 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β (πΈβπ) β ((πβ0)[,](πβπ))) |
161 | | simpr 485 |
. . . . . . 7
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β Β¬ (πΈβπ) β ran π) |
162 | | fveq2 6888 |
. . . . . . . . . 10
β’ (π = π β (πβπ) = (πβπ)) |
163 | 162 | breq1d 5157 |
. . . . . . . . 9
β’ (π = π β ((πβπ) < (πΈβπ) β (πβπ) < (πΈβπ))) |
164 | 163 | cbvrabv 3442 |
. . . . . . . 8
β’ {π β (0..^π) β£ (πβπ) < (πΈβπ)} = {π β (0..^π) β£ (πβπ) < (πΈβπ)} |
165 | 164 | supeq1i 9438 |
. . . . . . 7
β’
sup({π β
(0..^π) β£ (πβπ) < (πΈβπ)}, β, < ) = sup({π β (0..^π) β£ (πβπ) < (πΈβπ)}, β, < ) |
166 | 151, 152,
160, 161, 165 | fourierdlem25 44834 |
. . . . . 6
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,)(πβ(π + 1)))) |
167 | | ioossioc 44191 |
. . . . . . . . 9
β’ ((πβπ)(,)(πβ(π + 1))) β ((πβπ)(,](πβ(π + 1))) |
168 | 167 | sseli 3977 |
. . . . . . . 8
β’ ((πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
169 | 168 | a1i 11 |
. . . . . . 7
β’ ((((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β§ π β (0..^π)) β ((πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β (πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
170 | 169 | reximdva 3168 |
. . . . . 6
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,)(πβ(π + 1))) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
171 | 166, 170 | mpd 15 |
. . . . 5
β’ (((π β§ (πΈβπ) β (π΄(,]π΅)) β§ Β¬ (πΈβπ) β ran π) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
172 | 150, 171 | pm2.61dan 811 |
. . . 4
β’ ((π β§ (πΈβπ) β (π΄(,]π΅)) β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
173 | 15, 172 | mpdan 685 |
. . 3
β’ (π β βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
174 | | fourierdlem49.f |
. . . . . . . . . . 11
β’ (π β πΉ:π·βΆβ) |
175 | | frel 6719 |
. . . . . . . . . . 11
β’ (πΉ:π·βΆβ β Rel πΉ) |
176 | 174, 175 | syl 17 |
. . . . . . . . . 10
β’ (π β Rel πΉ) |
177 | | resindm 6028 |
. . . . . . . . . . 11
β’ (Rel
πΉ β (πΉ βΎ ((-β(,)(πΈβπ)) β© dom πΉ)) = (πΉ βΎ (-β(,)(πΈβπ)))) |
178 | 177 | eqcomd 2738 |
. . . . . . . . . 10
β’ (Rel
πΉ β (πΉ βΎ (-β(,)(πΈβπ))) = (πΉ βΎ ((-β(,)(πΈβπ)) β© dom πΉ))) |
179 | 176, 178 | syl 17 |
. . . . . . . . 9
β’ (π β (πΉ βΎ (-β(,)(πΈβπ))) = (πΉ βΎ ((-β(,)(πΈβπ)) β© dom πΉ))) |
180 | | fdm 6723 |
. . . . . . . . . . . 12
β’ (πΉ:π·βΆβ β dom πΉ = π·) |
181 | 174, 180 | syl 17 |
. . . . . . . . . . 11
β’ (π β dom πΉ = π·) |
182 | 181 | ineq2d 4211 |
. . . . . . . . . 10
β’ (π β ((-β(,)(πΈβπ)) β© dom πΉ) = ((-β(,)(πΈβπ)) β© π·)) |
183 | 182 | reseq2d 5979 |
. . . . . . . . 9
β’ (π β (πΉ βΎ ((-β(,)(πΈβπ)) β© dom πΉ)) = (πΉ βΎ ((-β(,)(πΈβπ)) β© π·))) |
184 | 179, 183 | eqtrd 2772 |
. . . . . . . 8
β’ (π β (πΉ βΎ (-β(,)(πΈβπ))) = (πΉ βΎ ((-β(,)(πΈβπ)) β© π·))) |
185 | 184 | 3ad2ant1 1133 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΉ βΎ (-β(,)(πΈβπ))) = (πΉ βΎ ((-β(,)(πΈβπ)) β© π·))) |
186 | 185 | oveq1d 7420 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ ((-β(,)(πΈβπ)) β© π·)) limβ (πΈβπ))) |
187 | | ax-resscn 11163 |
. . . . . . . . . . 11
β’ β
β β |
188 | 187 | a1i 11 |
. . . . . . . . . 10
β’ (π β β β
β) |
189 | 174, 188 | fssd 6732 |
. . . . . . . . 9
β’ (π β πΉ:π·βΆβ) |
190 | 189 | 3ad2ant1 1133 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β πΉ:π·βΆβ) |
191 | | inss2 4228 |
. . . . . . . . 9
β’
((-β(,)(πΈβπ)) β© π·) β π· |
192 | 191 | a1i 11 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((-β(,)(πΈβπ)) β© π·) β π·) |
193 | 190, 192 | fssresd 6755 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΉ βΎ ((-β(,)(πΈβπ)) β© π·)):((-β(,)(πΈβπ)) β© π·)βΆβ) |
194 | | mnfxr 11267 |
. . . . . . . . . 10
β’ -β
β β* |
195 | 194 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β -β β
β*) |
196 | 25 | adantr 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β π:(0...π)βΆβ) |
197 | | elfzofz 13644 |
. . . . . . . . . . . . . 14
β’ (π β (0..^π) β π β (0...π)) |
198 | 197 | adantl 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β π β (0...π)) |
199 | 196, 198 | ffvelcdmd 7084 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
200 | 199 | rexrd 11260 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β (πβπ) β
β*) |
201 | 199 | mnfltd 13100 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β -β < (πβπ)) |
202 | 195, 200,
201 | xrltled 13125 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β -β β€ (πβπ)) |
203 | | iooss1 13355 |
. . . . . . . . . 10
β’
((-β β β* β§ -β β€ (πβπ)) β ((πβπ)(,)(πΈβπ)) β (-β(,)(πΈβπ))) |
204 | 194, 202,
203 | sylancr 587 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β ((πβπ)(,)(πΈβπ)) β (-β(,)(πΈβπ))) |
205 | 204 | 3adant3 1132 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πΈβπ)) β (-β(,)(πΈβπ))) |
206 | | fzofzp1 13725 |
. . . . . . . . . . . . . 14
β’ (π β (0..^π) β (π + 1) β (0...π)) |
207 | 206 | adantl 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (π + 1) β (0...π)) |
208 | 196, 207 | ffvelcdmd 7084 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β (πβ(π + 1)) β β) |
209 | 208 | 3adant3 1132 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβ(π + 1)) β β) |
210 | 209 | rexrd 11260 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβ(π + 1)) β
β*) |
211 | 199 | 3adant3 1132 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β β) |
212 | 211 | rexrd 11260 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β
β*) |
213 | | simp3 1138 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) |
214 | | iocleub 44202 |
. . . . . . . . . . 11
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β€ (πβ(π + 1))) |
215 | 212, 210,
213, 214 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β€ (πβ(π + 1))) |
216 | | iooss2 13356 |
. . . . . . . . . 10
β’ (((πβ(π + 1)) β β* β§
(πΈβπ) β€ (πβ(π + 1))) β ((πβπ)(,)(πΈβπ)) β ((πβπ)(,)(πβ(π + 1)))) |
217 | 210, 215,
216 | syl2anc 584 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πΈβπ)) β ((πβπ)(,)(πβ(π + 1)))) |
218 | | fourierdlem49.cn |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) β (((πβπ)(,)(πβ(π + 1)))βcnββ)) |
219 | | cncff 24400 |
. . . . . . . . . . . . 13
β’ ((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) β (((πβπ)(,)(πβ(π + 1)))βcnββ) β (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))):((πβπ)(,)(πβ(π + 1)))βΆβ) |
220 | | fdm 6723 |
. . . . . . . . . . . . 13
β’ ((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))):((πβπ)(,)(πβ(π + 1)))βΆβ β dom (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) = ((πβπ)(,)(πβ(π + 1)))) |
221 | 218, 219,
220 | 3syl 18 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β dom (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) = ((πβπ)(,)(πβ(π + 1)))) |
222 | | ssdmres 6002 |
. . . . . . . . . . . 12
β’ (((πβπ)(,)(πβ(π + 1))) β dom πΉ β dom (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) = ((πβπ)(,)(πβ(π + 1)))) |
223 | 221, 222 | sylibr 233 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β ((πβπ)(,)(πβ(π + 1))) β dom πΉ) |
224 | 181 | adantr 481 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β dom πΉ = π·) |
225 | 223, 224 | sseqtrd 4021 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β ((πβπ)(,)(πβ(π + 1))) β π·) |
226 | 225 | 3adant3 1132 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πβ(π + 1))) β π·) |
227 | 217, 226 | sstrd 3991 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πΈβπ)) β π·) |
228 | 205, 227 | ssind 4231 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πΈβπ)) β ((-β(,)(πΈβπ)) β© π·)) |
229 | | fourierdlem49.d |
. . . . . . . . . 10
β’ (π β π· β β) |
230 | 229, 188 | sstrd 3991 |
. . . . . . . . 9
β’ (π β π· β β) |
231 | 230 | 3ad2ant1 1133 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π· β β) |
232 | 191, 231 | sstrid 3992 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((-β(,)(πΈβπ)) β© π·) β β) |
233 | | eqid 2732 |
. . . . . . 7
β’
(TopOpenββfld) =
(TopOpenββfld) |
234 | | eqid 2732 |
. . . . . . 7
β’
((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) =
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
235 | 133 | 3ad2ant1 1133 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β β) |
236 | 235 | rexrd 11260 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β
β*) |
237 | | iocgtlb 44201 |
. . . . . . . . . 10
β’ (((πβπ) β β* β§ (πβ(π + 1)) β β* β§
(πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (πΈβπ)) |
238 | 212, 210,
213, 237 | syl3anc 1371 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (πΈβπ)) |
239 | 235 | leidd 11776 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β€ (πΈβπ)) |
240 | 212, 236,
236, 238, 239 | eliocd 44206 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β ((πβπ)(,](πΈβπ))) |
241 | | ioounsn 13450 |
. . . . . . . . . . 11
β’ (((πβπ) β β* β§ (πΈβπ) β β* β§ (πβπ) < (πΈβπ)) β (((πβπ)(,)(πΈβπ)) βͺ {(πΈβπ)}) = ((πβπ)(,](πΈβπ))) |
242 | 212, 236,
238, 241 | syl3anc 1371 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ)(,)(πΈβπ)) βͺ {(πΈβπ)}) = ((πβπ)(,](πΈβπ))) |
243 | 242 | fveq2d 6892 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β(((πβπ)(,)(πΈβπ)) βͺ {(πΈβπ)})) =
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β((πβπ)(,](πΈβπ)))) |
244 | 233 | cnfldtop 24291 |
. . . . . . . . . . 11
β’
(TopOpenββfld) β Top |
245 | | ovex 7438 |
. . . . . . . . . . . . 13
β’
(-β(,)(πΈβπ)) β V |
246 | 245 | inex1 5316 |
. . . . . . . . . . . 12
β’
((-β(,)(πΈβπ)) β© π·) β V |
247 | | snex 5430 |
. . . . . . . . . . . 12
β’ {(πΈβπ)} β V |
248 | 246, 247 | unex 7729 |
. . . . . . . . . . 11
β’
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β V |
249 | | resttop 22655 |
. . . . . . . . . . 11
β’
(((TopOpenββfld) β Top β§
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β V) β
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β Top) |
250 | 244, 248,
249 | mp2an 690 |
. . . . . . . . . 10
β’
((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β Top |
251 | | retop 24269 |
. . . . . . . . . . . . 13
β’
(topGenβran (,)) β Top |
252 | 251 | a1i 11 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (topGenβran (,)) β
Top) |
253 | 248 | a1i 11 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β V) |
254 | | iooretop 24273 |
. . . . . . . . . . . . 13
β’ ((πβπ)(,)+β) β (topGenβran
(,)) |
255 | 254 | a1i 11 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)+β) β (topGenβran
(,))) |
256 | | elrestr 17370 |
. . . . . . . . . . . 12
β’
(((topGenβran (,)) β Top β§ (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β V β§ ((πβπ)(,)+β) β (topGenβran (,)))
β (((πβπ)(,)+β) β©
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β ((topGenβran (,))
βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
257 | 252, 253,
255, 256 | syl3anc 1371 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β ((topGenβran (,))
βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
258 | | simpr 485 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ = (πΈβπ)) β π₯ = (πΈβπ)) |
259 | | pnfxr 11264 |
. . . . . . . . . . . . . . . . . . . 20
β’ +β
β β* |
260 | 259 | a1i 11 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β +β β
β*) |
261 | 235 | ltpnfd 13097 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) < +β) |
262 | 212, 260,
235, 238, 261 | eliood 44197 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β ((πβπ)(,)+β)) |
263 | | snidg 4661 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((πΈβπ) β β β (πΈβπ) β {(πΈβπ)}) |
264 | | elun2 4176 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((πΈβπ) β {(πΈβπ)} β (πΈβπ) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
265 | 263, 264 | syl 17 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((πΈβπ) β β β (πΈβπ) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
266 | 133, 265 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (πΈβπ) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
267 | 266 | 3ad2ant1 1133 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
268 | 262, 267 | elind 4193 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
269 | 268 | adantr 481 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ = (πΈβπ)) β (πΈβπ) β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
270 | 258, 269 | eqeltrd 2833 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ = (πΈβπ)) β π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
271 | 270 | adantlr 713 |
. . . . . . . . . . . . . 14
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ π₯ = (πΈβπ)) β π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
272 | 212 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πβπ) β
β*) |
273 | 259 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β +β β
β*) |
274 | 200 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πβπ) β
β*) |
275 | 133 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π β (0..^π)) β (πΈβπ) β β) |
276 | 275 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πΈβπ) β β) |
277 | | iocssre 13400 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((πβπ) β β* β§ (πΈβπ) β β) β ((πβπ)(,](πΈβπ)) β β) |
278 | 274, 276,
277 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β ((πβπ)(,](πΈβπ)) β β) |
279 | | simpr 485 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β ((πβπ)(,](πΈβπ))) |
280 | 278, 279 | sseldd 3982 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β β) |
281 | 280 | 3adantl3 1168 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β β) |
282 | 276 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πΈβπ) β
β*) |
283 | | iocgtlb 44201 |
. . . . . . . . . . . . . . . . . . 19
β’ (((πβπ) β β* β§ (πΈβπ) β β* β§ π₯ β ((πβπ)(,](πΈβπ))) β (πβπ) < π₯) |
284 | 274, 282,
279, 283 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πβπ) < π₯) |
285 | 284 | 3adantl3 1168 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β (πβπ) < π₯) |
286 | 281 | ltpnfd 13097 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ < +β) |
287 | 272, 273,
281, 285, 286 | eliood 44197 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β ((πβπ)(,)+β)) |
288 | 287 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β ((πβπ)(,)+β)) |
289 | 194 | a1i 11 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β -β β
β*) |
290 | 282 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πΈβπ) β
β*) |
291 | 280 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β β) |
292 | 291 | mnfltd 13100 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β -β < π₯) |
293 | 133 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πΈβπ) β β) |
294 | | iocleub 44202 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((πβπ) β β* β§ (πΈβπ) β β* β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β€ (πΈβπ)) |
295 | 274, 282,
279, 294 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β€ (πΈβπ)) |
296 | 295 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β€ (πΈβπ)) |
297 | | neqne 2948 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (Β¬
π₯ = (πΈβπ) β π₯ β (πΈβπ)) |
298 | 297 | necomd 2996 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (Β¬
π₯ = (πΈβπ) β (πΈβπ) β π₯) |
299 | 298 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πΈβπ) β π₯) |
300 | 291, 293,
296, 299 | leneltd 11364 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ < (πΈβπ)) |
301 | 289, 290,
291, 292, 300 | eliood 44197 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π β (0..^π)) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β (-β(,)(πΈβπ))) |
302 | 301 | 3adantll3 43711 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β (-β(,)(πΈβπ))) |
303 | 226 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β ((πβπ)(,)(πβ(π + 1))) β π·) |
304 | 272 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πβπ) β
β*) |
305 | 210 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πβ(π + 1)) β
β*) |
306 | 281 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β β) |
307 | 285 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πβπ) < π₯) |
308 | 235 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πΈβπ) β β) |
309 | 209 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πβ(π + 1)) β β) |
310 | 300 | 3adantll3 43711 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ < (πΈβπ)) |
311 | 215 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β (πΈβπ) β€ (πβ(π + 1))) |
312 | 306, 308,
309, 310, 311 | ltletrd 11370 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ < (πβ(π + 1))) |
313 | 304, 305,
306, 307, 312 | eliood 44197 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β ((πβπ)(,)(πβ(π + 1)))) |
314 | 303, 313 | sseldd 3982 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β π·) |
315 | 302, 314 | elind 4193 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β ((-β(,)(πΈβπ)) β© π·)) |
316 | | elun1 4175 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β ((-β(,)(πΈβπ)) β© π·) β π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
317 | 315, 316 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
318 | 288, 317 | elind 4193 |
. . . . . . . . . . . . . 14
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β§ Β¬ π₯ = (πΈβπ)) β π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
319 | 271, 318 | pm2.61dan 811 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,](πΈβπ))) β π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
320 | 212 | adantr 481 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β (πβπ) β
β*) |
321 | 236 | adantr 481 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β (πΈβπ) β
β*) |
322 | | elinel1 4194 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β π₯ β ((πβπ)(,)+β)) |
323 | | elioore 13350 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ β ((πβπ)(,)+β) β π₯ β β) |
324 | 323 | rexrd 11260 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β ((πβπ)(,)+β) β π₯ β β*) |
325 | 322, 324 | syl 17 |
. . . . . . . . . . . . . . 15
β’ (π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β π₯ β β*) |
326 | 325 | adantl 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β π₯ β β*) |
327 | 200 | adantr 481 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β (πβπ) β
β*) |
328 | 259 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β +β β
β*) |
329 | 322 | adantl 482 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β π₯ β ((πβπ)(,)+β)) |
330 | | ioogtlb 44194 |
. . . . . . . . . . . . . . . 16
β’ (((πβπ) β β* β§ +β
β β* β§ π₯ β ((πβπ)(,)+β)) β (πβπ) < π₯) |
331 | 327, 328,
329, 330 | syl3anc 1371 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β (πβπ) < π₯) |
332 | 331 | 3adantl3 1168 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β (πβπ) < π₯) |
333 | | elinel2 4195 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) |
334 | | elsni 4644 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ β {(πΈβπ)} β π₯ = (πΈβπ)) |
335 | 334 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β {(πΈβπ)}) β π₯ = (πΈβπ)) |
336 | 134 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β {(πΈβπ)}) β (πΈβπ) β€ (πΈβπ)) |
337 | 335, 336 | eqbrtrd 5169 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π₯ β {(πΈβπ)}) β π₯ β€ (πΈβπ)) |
338 | 337 | adantlr 713 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β§ π₯ β {(πΈβπ)}) β π₯ β€ (πΈβπ)) |
339 | | simpll 765 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β§ Β¬ π₯ β {(πΈβπ)}) β π) |
340 | | elunnel2 4149 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β§ Β¬ π₯ β {(πΈβπ)}) β π₯ β ((-β(,)(πΈβπ)) β© π·)) |
341 | 340 | adantll 712 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β§ Β¬ π₯ β {(πΈβπ)}) β π₯ β ((-β(,)(πΈβπ)) β© π·)) |
342 | | elinel1 4194 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ β ((-β(,)(πΈβπ)) β© π·) β π₯ β (-β(,)(πΈβπ))) |
343 | | elioore 13350 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π₯ β (-β(,)(πΈβπ)) β π₯ β β) |
344 | 343 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β π₯ β β) |
345 | 133 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β (πΈβπ) β β) |
346 | 194 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β -β β
β*) |
347 | 345 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β (πΈβπ) β
β*) |
348 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β π₯ β (-β(,)(πΈβπ))) |
349 | | iooltub 44209 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
((-β β β* β§ (πΈβπ) β β* β§ π₯ β (-β(,)(πΈβπ))) β π₯ < (πΈβπ)) |
350 | 346, 347,
348, 349 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β π₯ < (πΈβπ)) |
351 | 344, 345,
350 | ltled 11358 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β (-β(,)(πΈβπ))) β π₯ β€ (πΈβπ)) |
352 | 342, 351 | sylan2 593 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π₯ β ((-β(,)(πΈβπ)) β© π·)) β π₯ β€ (πΈβπ)) |
353 | 339, 341,
352 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β§ Β¬ π₯ β {(πΈβπ)}) β π₯ β€ (πΈβπ)) |
354 | 338, 353 | pm2.61dan 811 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β π₯ β€ (πΈβπ)) |
355 | 354 | adantlr 713 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β π₯ β€ (πΈβπ)) |
356 | 333, 355 | sylan2 593 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β π₯ β€ (πΈβπ)) |
357 | 356 | 3adantl3 1168 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β π₯ β€ (πΈβπ)) |
358 | 320, 321,
326, 332, 357 | eliocd 44206 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β π₯ β ((πβπ)(,](πΈβπ))) |
359 | 319, 358 | impbida 799 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (π₯ β ((πβπ)(,](πΈβπ)) β π₯ β (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))) |
360 | 359 | eqrdv 2730 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,](πΈβπ)) = (((πβπ)(,)+β) β© (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
361 | | ioossre 13381 |
. . . . . . . . . . . . . 14
β’
(-β(,)(πΈβπ)) β β |
362 | | ssinss1 4236 |
. . . . . . . . . . . . . 14
β’
((-β(,)(πΈβπ)) β β β
((-β(,)(πΈβπ)) β© π·) β β) |
363 | 361, 362 | mp1i 13 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((-β(,)(πΈβπ)) β© π·) β β) |
364 | 235 | snssd 4811 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β {(πΈβπ)} β β) |
365 | 363, 364 | unssd 4185 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β β) |
366 | | eqid 2732 |
. . . . . . . . . . . . 13
β’
(topGenβran (,)) = (topGenβran (,)) |
367 | 233, 366 | rerest 24311 |
. . . . . . . . . . . 12
β’
((((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}) β β β
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) = ((topGenβran (,))
βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
368 | 365, 367 | syl 17 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) = ((topGenβran (,))
βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
369 | 257, 360,
368 | 3eltr4d 2848 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,](πΈβπ)) β
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) |
370 | | isopn3i 22577 |
. . . . . . . . . 10
β’
((((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})) β Top β§ ((πβπ)(,](πΈβπ)) β
((TopOpenββfld) βΎt (((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)}))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β((πβπ)(,](πΈβπ))) = ((πβπ)(,](πΈβπ))) |
371 | 250, 369,
370 | sylancr 587 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β((πβπ)(,](πΈβπ))) = ((πβπ)(,](πΈβπ))) |
372 | 243, 371 | eqtr2d 2773 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,](πΈβπ)) =
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β(((πβπ)(,)(πΈβπ)) βͺ {(πΈβπ)}))) |
373 | 240, 372 | eleqtrd 2835 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) β
((intβ((TopOpenββfld) βΎt
(((-β(,)(πΈβπ)) β© π·) βͺ {(πΈβπ)})))β(((πβπ)(,)(πΈβπ)) βͺ {(πΈβπ)}))) |
374 | 193, 228,
232, 233, 234, 373 | limcres 25394 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πΉ βΎ ((-β(,)(πΈβπ)) β© π·)) βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ ((-β(,)(πΈβπ)) β© π·)) limβ (πΈβπ))) |
375 | 228 | resabs1d 6010 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((-β(,)(πΈβπ)) β© π·)) βΎ ((πβπ)(,)(πΈβπ))) = (πΉ βΎ ((πβπ)(,)(πΈβπ)))) |
376 | 375 | oveq1d 7420 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πΉ βΎ ((-β(,)(πΈβπ)) β© π·)) βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
377 | 186, 374,
376 | 3eqtr2d 2778 |
. . . . 5
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
378 | 181 | feq2d 6700 |
. . . . . . . . . . . 12
β’ (π β (πΉ:dom πΉβΆβ β πΉ:π·βΆβ)) |
379 | 189, 378 | mpbird 256 |
. . . . . . . . . . 11
β’ (π β πΉ:dom πΉβΆβ) |
380 | 379 | adantr 481 |
. . . . . . . . . 10
β’ ((π β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β πΉ:dom πΉβΆβ) |
381 | 380 | 3ad2antl1 1185 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β πΉ:dom πΉβΆβ) |
382 | | ioosscn 13382 |
. . . . . . . . . 10
β’ ((πβπ)(,)(πΈβπ)) β β |
383 | 382 | a1i 11 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β ((πβπ)(,)(πΈβπ)) β β) |
384 | 181 | eqcomd 2738 |
. . . . . . . . . . . 12
β’ (π β π· = dom πΉ) |
385 | 384 | 3ad2ant1 1133 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π· = dom πΉ) |
386 | 227, 385 | sseqtrd 4021 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ)(,)(πΈβπ)) β dom πΉ) |
387 | 386 | adantr 481 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β ((πβπ)(,)(πΈβπ)) β dom πΉ) |
388 | 7 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β π = (π₯ β β β¦
((ββ((π΅ β
π₯) / π)) Β· π))) |
389 | | oveq2 7413 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β (π΅ β π₯) = (π΅ β π)) |
390 | 389 | oveq1d 7420 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β ((π΅ β π₯) / π) = ((π΅ β π) / π)) |
391 | 390 | fveq2d 6892 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β (ββ((π΅ β π₯) / π)) = (ββ((π΅ β π) / π))) |
392 | 391 | oveq1d 7420 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π β ((ββ((π΅ β π₯) / π)) Β· π) = ((ββ((π΅ β π) / π)) Β· π)) |
393 | 392 | adantl 482 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π₯ = π) β ((ββ((π΅ β π₯) / π)) Β· π) = ((ββ((π΅ β π) / π)) Β· π)) |
394 | 2, 14 | resubcld 11638 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (π΅ β π) β β) |
395 | 2, 1 | resubcld 11638 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (π΅ β π΄) β β) |
396 | 4, 395 | eqeltrid 2837 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β π β β) |
397 | 1, 2 | posdifd 11797 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β (π΄ < π΅ β 0 < (π΅ β π΄))) |
398 | 3, 397 | mpbid 231 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β 0 < (π΅ β π΄)) |
399 | 4 | eqcomi 2741 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π΅ β π΄) = π |
400 | 399 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (π΅ β π΄) = π) |
401 | 398, 400 | breqtrd 5173 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β 0 < π) |
402 | 401 | gt0ne0d 11774 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β π β 0) |
403 | 394, 396,
402 | redivcld 12038 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π΅ β π) / π) β β) |
404 | 403 | flcld 13759 |
. . . . . . . . . . . . . . . . 17
β’ (π β (ββ((π΅ β π) / π)) β β€) |
405 | 404 | zred 12662 |
. . . . . . . . . . . . . . . 16
β’ (π β (ββ((π΅ β π) / π)) β β) |
406 | 405, 396 | remulcld 11240 |
. . . . . . . . . . . . . . 15
β’ (π β ((ββ((π΅ β π) / π)) Β· π) β β) |
407 | 388, 393,
14, 406 | fvmptd 7002 |
. . . . . . . . . . . . . 14
β’ (π β (πβπ) = ((ββ((π΅ β π) / π)) Β· π)) |
408 | 407, 406 | eqeltrd 2833 |
. . . . . . . . . . . . 13
β’ (π β (πβπ) β β) |
409 | 408 | recnd 11238 |
. . . . . . . . . . . 12
β’ (π β (πβπ) β β) |
410 | 409 | adantr 481 |
. . . . . . . . . . 11
β’ ((π β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β (πβπ) β β) |
411 | 410 | 3ad2antl1 1185 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β (πβπ) β β) |
412 | 411 | negcld 11554 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β -(πβπ) β β) |
413 | | eqid 2732 |
. . . . . . . . 9
β’ {π§ β β β£
βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} = {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} |
414 | | ioosscn 13382 |
. . . . . . . . . . . . . . . . . . 19
β’ (((πβπ) β (πβπ))(,)π) β β |
415 | 414 | sseli 3977 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (((πβπ) β (πβπ))(,)π) β π¦ β β) |
416 | 415 | adantl 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β β) |
417 | 409 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
418 | 416, 417 | pncand 11568 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) β (πβπ)) = π¦) |
419 | 418 | eqcomd 2738 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ = ((π¦ + (πβπ)) β (πβπ))) |
420 | 419 | 3ad2antl1 1185 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ = ((π¦ + (πβπ)) β (πβπ))) |
421 | 407 | oveq2d 7421 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π¦ + (πβπ)) β (πβπ)) = ((π¦ + (πβπ)) β ((ββ((π΅ β π) / π)) Β· π))) |
422 | 421 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) β (πβπ)) = ((π¦ + (πβπ)) β ((ββ((π΅ β π) / π)) Β· π))) |
423 | 416, 417 | addcld 11229 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β β) |
424 | 406 | recnd 11238 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((ββ((π΅ β π) / π)) Β· π) β β) |
425 | 424 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((ββ((π΅ β π) / π)) Β· π) β β) |
426 | 423, 425 | negsubd 11573 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) + -((ββ((π΅ β π) / π)) Β· π)) = ((π¦ + (πβπ)) β ((ββ((π΅ β π) / π)) Β· π))) |
427 | 404 | zcnd 12663 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (ββ((π΅ β π) / π)) β β) |
428 | 396 | recnd 11238 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π β β) |
429 | 427, 428 | mulneg1d 11663 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (-(ββ((π΅ β π) / π)) Β· π) = -((ββ((π΅ β π) / π)) Β· π)) |
430 | 429 | eqcomd 2738 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β -((ββ((π΅ β π) / π)) Β· π) = (-(ββ((π΅ β π) / π)) Β· π)) |
431 | 430 | oveq2d 7421 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π¦ + (πβπ)) + -((ββ((π΅ β π) / π)) Β· π)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
432 | 431 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) + -((ββ((π΅ β π) / π)) Β· π)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
433 | 422, 426,
432 | 3eqtr2d 2778 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) β (πβπ)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
434 | 433 | 3ad2antl1 1185 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) β (πβπ)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
435 | 404 | znegcld 12664 |
. . . . . . . . . . . . . . . . . 18
β’ (π β -(ββ((π΅ β π) / π)) β β€) |
436 | 435 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β -(ββ((π΅ β π) / π)) β β€) |
437 | 436 | 3ad2antl1 1185 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β -(ββ((π΅ β π) / π)) β β€) |
438 | | simpl1 1191 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π) |
439 | 227 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ)(,)(πΈβπ)) β π·) |
440 | 200 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β
β*) |
441 | 133 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (πΈβπ) β
β*) |
442 | 441 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πΈβπ) β
β*) |
443 | | elioore 13350 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π¦ β (((πβπ) β (πβπ))(,)π) β π¦ β β) |
444 | 443 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β β) |
445 | 408 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
446 | 444, 445 | readdcld 11239 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β β) |
447 | 446 | adantlr 713 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β β) |
448 | 408 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
449 | 199, 448 | resubcld 11638 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π β§ π β (0..^π)) β ((πβπ) β (πβπ)) β β) |
450 | 449 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π β§ π β (0..^π)) β ((πβπ) β (πβπ)) β
β*) |
451 | 450 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) β
β*) |
452 | 14 | rexrd 11260 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β π β
β*) |
453 | 452 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π β
β*) |
454 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β (((πβπ) β (πβπ))(,)π)) |
455 | | ioogtlb 44194 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) < π¦) |
456 | 451, 453,
454, 455 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((πβπ) β (πβπ)) < π¦) |
457 | 199 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
458 | 448 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) β β) |
459 | 443 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β β) |
460 | 457, 458,
459 | ltsubaddd 11806 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (((πβπ) β (πβπ)) < π¦ β (πβπ) < (π¦ + (πβπ)))) |
461 | 456, 460 | mpbid 231 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (πβπ) < (π¦ + (πβπ))) |
462 | 14 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π β β) |
463 | | iooltub 44209 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ < π) |
464 | 451, 453,
454, 463 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ < π) |
465 | 459, 462,
458, 464 | ltadd1dd 11821 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (π + (πβπ))) |
466 | 5 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β πΈ = (π₯ β β β¦ (π₯ + (πβπ₯)))) |
467 | | id 22 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π₯ = π β π₯ = π) |
468 | | fveq2 6888 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π₯ = π β (πβπ₯) = (πβπ)) |
469 | 467, 468 | oveq12d 7423 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π₯ = π β (π₯ + (πβπ₯)) = (π + (πβπ))) |
470 | 469 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π β§ π₯ = π) β (π₯ + (πβπ₯)) = (π + (πβπ))) |
471 | 14, 408 | readdcld 11239 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π β (π + (πβπ)) β β) |
472 | 466, 470,
14, 471 | fvmptd 7002 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β (πΈβπ) = (π + (πβπ))) |
473 | 472 | eqcomd 2738 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β (π + (πβπ)) = (πΈβπ)) |
474 | 473 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π + (πβπ)) = (πΈβπ)) |
475 | 465, 474 | breqtrd 5173 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) < (πΈβπ)) |
476 | 440, 442,
447, 461, 475 | eliood 44197 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β ((πβπ)(,)(πΈβπ))) |
477 | 476 | 3adantl3 1168 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β ((πβπ)(,)(πΈβπ))) |
478 | 439, 477 | sseldd 3982 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π¦ + (πβπ)) β π·) |
479 | 438, 478,
437 | 3jca 1128 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β (π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€)) |
480 | | eleq1 2821 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = -(ββ((π΅ β π) / π)) β (π β β€ β
-(ββ((π΅ β
π) / π)) β β€)) |
481 | 480 | 3anbi3d 1442 |
. . . . . . . . . . . . . . . . . 18
β’ (π = -(ββ((π΅ β π) / π)) β ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β (π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€))) |
482 | | oveq1 7412 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = -(ββ((π΅ β π) / π)) β (π Β· π) = (-(ββ((π΅ β π) / π)) Β· π)) |
483 | 482 | oveq2d 7421 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = -(ββ((π΅ β π) / π)) β ((π¦ + (πβπ)) + (π Β· π)) = ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π))) |
484 | 483 | eleq1d 2818 |
. . . . . . . . . . . . . . . . . 18
β’ (π = -(ββ((π΅ β π) / π)) β (((π¦ + (πβπ)) + (π Β· π)) β π· β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·)) |
485 | 481, 484 | imbi12d 344 |
. . . . . . . . . . . . . . . . 17
β’ (π = -(ββ((π΅ β π) / π)) β (((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·) β ((π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·))) |
486 | | ovex 7438 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ + (πβπ)) β V |
487 | | eleq1 2821 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = (π¦ + (πβπ)) β (π₯ β π· β (π¦ + (πβπ)) β π·)) |
488 | 487 | 3anbi2d 1441 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = (π¦ + (πβπ)) β ((π β§ π₯ β π· β§ π β β€) β (π β§ (π¦ + (πβπ)) β π· β§ π β β€))) |
489 | | oveq1 7412 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = (π¦ + (πβπ)) β (π₯ + (π Β· π)) = ((π¦ + (πβπ)) + (π Β· π))) |
490 | 489 | eleq1d 2818 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = (π¦ + (πβπ)) β ((π₯ + (π Β· π)) β π· β ((π¦ + (πβπ)) + (π Β· π)) β π·)) |
491 | 488, 490 | imbi12d 344 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = (π¦ + (πβπ)) β (((π β§ π₯ β π· β§ π β β€) β (π₯ + (π Β· π)) β π·) β ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·))) |
492 | | fourierdlem49.dper |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π₯ β π· β§ π β β€) β (π₯ + (π Β· π)) β π·) |
493 | 486, 491,
492 | vtocl 3549 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ (π¦ + (πβπ)) β π· β§ π β β€) β ((π¦ + (πβπ)) + (π Β· π)) β π·) |
494 | 485, 493 | vtoclg 3556 |
. . . . . . . . . . . . . . . 16
β’
(-(ββ((π΅
β π) / π)) β β€ β ((π β§ (π¦ + (πβπ)) β π· β§ -(ββ((π΅ β π) / π)) β β€) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·)) |
495 | 437, 479,
494 | sylc 65 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) + (-(ββ((π΅ β π) / π)) Β· π)) β π·) |
496 | 434, 495 | eqeltrd 2833 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β ((π¦ + (πβπ)) β (πβπ)) β π·) |
497 | 420, 496 | eqeltrd 2833 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β (((πβπ) β (πβπ))(,)π)) β π¦ β π·) |
498 | 497 | ralrimiva 3146 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β βπ¦ β (((πβπ) β (πβπ))(,)π)π¦ β π·) |
499 | | dfss3 3969 |
. . . . . . . . . . . 12
β’ ((((πβπ) β (πβπ))(,)π) β π· β βπ¦ β (((πβπ) β (πβπ))(,)π)π¦ β π·) |
500 | 498, 499 | sylibr 233 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)π) β π·) |
501 | 199 | recnd 11238 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
502 | 409 | adantr 481 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (0..^π)) β (πβπ) β β) |
503 | 501, 502 | negsubd 11573 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (0..^π)) β ((πβπ) + -(πβπ)) = ((πβπ) β (πβπ))) |
504 | 503 | eqcomd 2738 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β ((πβπ) β (πβπ)) = ((πβπ) + -(πβπ))) |
505 | 472 | oveq1d 7420 |
. . . . . . . . . . . . . . . 16
β’ (π β ((πΈβπ) + -(πβπ)) = ((π + (πβπ)) + -(πβπ))) |
506 | 471 | recnd 11238 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π + (πβπ)) β β) |
507 | 506, 409 | negsubd 11573 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π + (πβπ)) + -(πβπ)) = ((π + (πβπ)) β (πβπ))) |
508 | 14 | recnd 11238 |
. . . . . . . . . . . . . . . . 17
β’ (π β π β β) |
509 | 508, 409 | pncand 11568 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π + (πβπ)) β (πβπ)) = π) |
510 | 505, 507,
509 | 3eqtrrd 2777 |
. . . . . . . . . . . . . . 15
β’ (π β π = ((πΈβπ) + -(πβπ))) |
511 | 510 | adantr 481 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β π = ((πΈβπ) + -(πβπ))) |
512 | 504, 511 | oveq12d 7423 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (((πβπ) β (πβπ))(,)π) = (((πβπ) + -(πβπ))(,)((πΈβπ) + -(πβπ)))) |
513 | 448 | renegcld 11637 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β -(πβπ) β β) |
514 | 199, 275,
513 | iooshift 44221 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β (((πβπ) + -(πβπ))(,)((πΈβπ) + -(πβπ))) = {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) |
515 | 512, 514 | eqtr2d 2773 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} = (((πβπ) β (πβπ))(,)π)) |
516 | 515 | 3adant3 1132 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} = (((πβπ) β (πβπ))(,)π)) |
517 | 181 | 3ad2ant1 1133 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β dom πΉ = π·) |
518 | 500, 516,
517 | 3sstr4d 4028 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} β dom πΉ) |
519 | 518 | adantr 481 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))} β dom πΉ) |
520 | 407 | negeqd 11450 |
. . . . . . . . . . . . . . . 16
β’ (π β -(πβπ) = -((ββ((π΅ β π) / π)) Β· π)) |
521 | 520, 430 | eqtrd 2772 |
. . . . . . . . . . . . . . 15
β’ (π β -(πβπ) = (-(ββ((π΅ β π) / π)) Β· π)) |
522 | 521 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ (π β (π₯ + -(πβπ)) = (π₯ + (-(ββ((π΅ β π) / π)) Β· π))) |
523 | 522 | fveq2d 6892 |
. . . . . . . . . . . . 13
β’ (π β (πΉβ(π₯ + -(πβπ))) = (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π)))) |
524 | 523 | adantr 481 |
. . . . . . . . . . . 12
β’ ((π β§ π₯ β ((πβπ)(,)(πΈβπ))) β (πΉβ(π₯ + -(πβπ))) = (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π)))) |
525 | 524 | 3ad2antl1 1185 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β (πΉβ(π₯ + -(πβπ))) = (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π)))) |
526 | 435 | adantr 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β ((πβπ)(,)(πΈβπ))) β -(ββ((π΅ β π) / π)) β β€) |
527 | 526 | 3ad2antl1 1185 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β -(ββ((π΅ β π) / π)) β β€) |
528 | | simpl1 1191 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β π) |
529 | 227 | sselda 3981 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β π₯ β π·) |
530 | 528, 529,
527 | 3jca 1128 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β (π β§ π₯ β π· β§ -(ββ((π΅ β π) / π)) β β€)) |
531 | 480 | 3anbi3d 1442 |
. . . . . . . . . . . . . 14
β’ (π = -(ββ((π΅ β π) / π)) β ((π β§ π₯ β π· β§ π β β€) β (π β§ π₯ β π· β§ -(ββ((π΅ β π) / π)) β β€))) |
532 | 482 | oveq2d 7421 |
. . . . . . . . . . . . . . . 16
β’ (π = -(ββ((π΅ β π) / π)) β (π₯ + (π Β· π)) = (π₯ + (-(ββ((π΅ β π) / π)) Β· π))) |
533 | 532 | fveq2d 6892 |
. . . . . . . . . . . . . . 15
β’ (π = -(ββ((π΅ β π) / π)) β (πΉβ(π₯ + (π Β· π))) = (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π)))) |
534 | 533 | eqeq1d 2734 |
. . . . . . . . . . . . . 14
β’ (π = -(ββ((π΅ β π) / π)) β ((πΉβ(π₯ + (π Β· π))) = (πΉβπ₯) β (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯))) |
535 | 531, 534 | imbi12d 344 |
. . . . . . . . . . . . 13
β’ (π = -(ββ((π΅ β π) / π)) β (((π β§ π₯ β π· β§ π β β€) β (πΉβ(π₯ + (π Β· π))) = (πΉβπ₯)) β ((π β§ π₯ β π· β§ -(ββ((π΅ β π) / π)) β β€) β (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯)))) |
536 | | fourierdlem49.per |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β π· β§ π β β€) β (πΉβ(π₯ + (π Β· π))) = (πΉβπ₯)) |
537 | 535, 536 | vtoclg 3556 |
. . . . . . . . . . . 12
β’
(-(ββ((π΅
β π) / π)) β β€ β ((π β§ π₯ β π· β§ -(ββ((π΅ β π) / π)) β β€) β (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯))) |
538 | 527, 530,
537 | sylc 65 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β (πΉβ(π₯ + (-(ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯)) |
539 | 525, 538 | eqtrd 2772 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β (πΉβ(π₯ + -(πβπ))) = (πΉβπ₯)) |
540 | 539 | adantlr 713 |
. . . . . . . . 9
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β§ π₯ β ((πβπ)(,)(πΈβπ))) β (πΉβ(π₯ + -(πβπ))) = (πΉβπ₯)) |
541 | | simpr 485 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
542 | 381, 383,
387, 412, 413, 519, 540, 541 | limcperiod 44330 |
. . . . . . . 8
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β π¦ β ((πΉ βΎ {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) limβ ((πΈβπ) + -(πβπ)))) |
543 | 515 | reseq2d 5979 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β (πΉ βΎ {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) = (πΉ βΎ (((πβπ) β (πβπ))(,)π))) |
544 | 511 | eqcomd 2738 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β ((πΈβπ) + -(πβπ)) = π) |
545 | 543, 544 | oveq12d 7423 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β ((πΉ βΎ {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) limβ ((πΈβπ) + -(πβπ))) = ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
546 | 545 | 3adant3 1132 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) limβ ((πΈβπ) + -(πβπ))) = ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
547 | 546 | adantr 481 |
. . . . . . . 8
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β ((πΉ βΎ {π§ β β β£ βπ₯ β ((πβπ)(,)(πΈβπ))π§ = (π₯ + -(πβπ))}) limβ ((πΈβπ) + -(πβπ))) = ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
548 | 542, 547 | eleqtrd 2835 |
. . . . . . 7
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) β π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
549 | 379 | adantr 481 |
. . . . . . . . . 10
β’ ((π β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β πΉ:dom πΉβΆβ) |
550 | 549 | 3ad2antl1 1185 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β πΉ:dom πΉβΆβ) |
551 | 414 | a1i 11 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β (((πβπ) β (πβπ))(,)π) β β) |
552 | 500, 517 | sseqtrrd 4022 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)π) β dom πΉ) |
553 | 552 | adantr 481 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β (((πβπ) β (πβπ))(,)π) β dom πΉ) |
554 | 409 | adantr 481 |
. . . . . . . . . 10
β’ ((π β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β (πβπ) β β) |
555 | 554 | 3ad2antl1 1185 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β (πβπ) β β) |
556 | | eqid 2732 |
. . . . . . . . 9
β’ {π§ β β β£
βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} = {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} |
557 | 501, 502 | npcand 11571 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (0..^π)) β (((πβπ) β (πβπ)) + (πβπ)) = (πβπ)) |
558 | 557 | eqcomd 2738 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β (πβπ) = (((πβπ) β (πβπ)) + (πβπ))) |
559 | 472 | adantr 481 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β (πΈβπ) = (π + (πβπ))) |
560 | 558, 559 | oveq12d 7423 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β ((πβπ)(,)(πΈβπ)) = ((((πβπ) β (πβπ)) + (πβπ))(,)(π + (πβπ)))) |
561 | 14 | adantr 481 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (0..^π)) β π β β) |
562 | 449, 561,
448 | iooshift 44221 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π)) β ((((πβπ) β (πβπ)) + (πβπ))(,)(π + (πβπ))) = {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) |
563 | 560, 562 | eqtr2d 2773 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} = ((πβπ)(,)(πΈβπ))) |
564 | 563 | 3adant3 1132 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} = ((πβπ)(,)(πΈβπ))) |
565 | 227, 564,
517 | 3sstr4d 4028 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} β dom πΉ) |
566 | 565 | adantr 481 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))} β dom πΉ) |
567 | 407 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ (π β (π₯ + (πβπ)) = (π₯ + ((ββ((π΅ β π) / π)) Β· π))) |
568 | 567 | fveq2d 6892 |
. . . . . . . . . . . . 13
β’ (π β (πΉβ(π₯ + (πβπ))) = (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π)))) |
569 | 568 | adantr 481 |
. . . . . . . . . . . 12
β’ ((π β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (πΉβ(π₯ + (πβπ))) = (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π)))) |
570 | 569 | 3ad2antl1 1185 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (πΉβ(π₯ + (πβπ))) = (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π)))) |
571 | 404 | adantr 481 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (ββ((π΅ β π) / π)) β β€) |
572 | 571 | 3ad2antl1 1185 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (ββ((π΅ β π) / π)) β β€) |
573 | | simpl1 1191 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β π) |
574 | 500 | sselda 3981 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β π₯ β π·) |
575 | 573, 574,
572 | 3jca 1128 |
. . . . . . . . . . . 12
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (π β§ π₯ β π· β§ (ββ((π΅ β π) / π)) β β€)) |
576 | | eleq1 2821 |
. . . . . . . . . . . . . . 15
β’ (π = (ββ((π΅ β π) / π)) β (π β β€ β (ββ((π΅ β π) / π)) β β€)) |
577 | 576 | 3anbi3d 1442 |
. . . . . . . . . . . . . 14
β’ (π = (ββ((π΅ β π) / π)) β ((π β§ π₯ β π· β§ π β β€) β (π β§ π₯ β π· β§ (ββ((π΅ β π) / π)) β β€))) |
578 | | oveq1 7412 |
. . . . . . . . . . . . . . . . 17
β’ (π = (ββ((π΅ β π) / π)) β (π Β· π) = ((ββ((π΅ β π) / π)) Β· π)) |
579 | 578 | oveq2d 7421 |
. . . . . . . . . . . . . . . 16
β’ (π = (ββ((π΅ β π) / π)) β (π₯ + (π Β· π)) = (π₯ + ((ββ((π΅ β π) / π)) Β· π))) |
580 | 579 | fveq2d 6892 |
. . . . . . . . . . . . . . 15
β’ (π = (ββ((π΅ β π) / π)) β (πΉβ(π₯ + (π Β· π))) = (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π)))) |
581 | 580 | eqeq1d 2734 |
. . . . . . . . . . . . . 14
β’ (π = (ββ((π΅ β π) / π)) β ((πΉβ(π₯ + (π Β· π))) = (πΉβπ₯) β (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯))) |
582 | 577, 581 | imbi12d 344 |
. . . . . . . . . . . . 13
β’ (π = (ββ((π΅ β π) / π)) β (((π β§ π₯ β π· β§ π β β€) β (πΉβ(π₯ + (π Β· π))) = (πΉβπ₯)) β ((π β§ π₯ β π· β§ (ββ((π΅ β π) / π)) β β€) β (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯)))) |
583 | 582, 536 | vtoclg 3556 |
. . . . . . . . . . . 12
β’
((ββ((π΅
β π) / π)) β β€ β ((π β§ π₯ β π· β§ (ββ((π΅ β π) / π)) β β€) β (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯))) |
584 | 572, 575,
583 | sylc 65 |
. . . . . . . . . . 11
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (πΉβ(π₯ + ((ββ((π΅ β π) / π)) Β· π))) = (πΉβπ₯)) |
585 | 570, 584 | eqtrd 2772 |
. . . . . . . . . 10
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (πΉβ(π₯ + (πβπ))) = (πΉβπ₯)) |
586 | 585 | adantlr 713 |
. . . . . . . . 9
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β (πΉβ(π₯ + (πβπ))) = (πΉβπ₯)) |
587 | | simpr 485 |
. . . . . . . . 9
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
588 | 550, 551,
553, 555, 556, 566, 586, 587 | limcperiod 44330 |
. . . . . . . 8
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β π¦ β ((πΉ βΎ {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) limβ (π + (πβπ)))) |
589 | 563 | reseq2d 5979 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β (πΉ βΎ {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) = (πΉ βΎ ((πβπ)(,)(πΈβπ)))) |
590 | 473 | adantr 481 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β (π + (πβπ)) = (πΈβπ)) |
591 | 589, 590 | oveq12d 7423 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β ((πΉ βΎ {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) limβ (π + (πβπ))) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
592 | 591 | 3adant3 1132 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) limβ (π + (πβπ))) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
593 | 592 | adantr 481 |
. . . . . . . 8
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β ((πΉ βΎ {π§ β β β£ βπ₯ β (((πβπ) β (πβπ))(,)π)π§ = (π₯ + (πβπ))}) limβ (π + (πβπ))) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
594 | 588, 593 | eleqtrd 2835 |
. . . . . . 7
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) β π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
595 | 548, 594 | impbida 799 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (π¦ β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) β π¦ β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π))) |
596 | 595 | eqrdv 2730 |
. . . . 5
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
597 | | resindm 6028 |
. . . . . . . . . . 11
β’ (Rel
πΉ β (πΉ βΎ ((-β(,)π) β© dom πΉ)) = (πΉ βΎ (-β(,)π))) |
598 | 597 | eqcomd 2738 |
. . . . . . . . . 10
β’ (Rel
πΉ β (πΉ βΎ (-β(,)π)) = (πΉ βΎ ((-β(,)π) β© dom πΉ))) |
599 | 176, 598 | syl 17 |
. . . . . . . . 9
β’ (π β (πΉ βΎ (-β(,)π)) = (πΉ βΎ ((-β(,)π) β© dom πΉ))) |
600 | 181 | ineq2d 4211 |
. . . . . . . . . 10
β’ (π β ((-β(,)π) β© dom πΉ) = ((-β(,)π) β© π·)) |
601 | 600 | reseq2d 5979 |
. . . . . . . . 9
β’ (π β (πΉ βΎ ((-β(,)π) β© dom πΉ)) = (πΉ βΎ ((-β(,)π) β© π·))) |
602 | 599, 601 | eqtrd 2772 |
. . . . . . . 8
β’ (π β (πΉ βΎ (-β(,)π)) = (πΉ βΎ ((-β(,)π) β© π·))) |
603 | 602 | oveq1d 7420 |
. . . . . . 7
β’ (π β ((πΉ βΎ (-β(,)π)) limβ π) = ((πΉ βΎ ((-β(,)π) β© π·)) limβ π)) |
604 | 603 | 3ad2ant1 1133 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (-β(,)π)) limβ π) = ((πΉ βΎ ((-β(,)π) β© π·)) limβ π)) |
605 | | inss2 4228 |
. . . . . . . . . 10
β’
((-β(,)π)
β© π·) β π· |
606 | 605 | a1i 11 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((-β(,)π) β© π·) β π·) |
607 | 190, 606 | fssresd 6755 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΉ βΎ ((-β(,)π) β© π·)):((-β(,)π) β© π·)βΆβ) |
608 | 449 | mnfltd 13100 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π)) β -β < ((πβπ) β (πβπ))) |
609 | 195, 450,
608 | xrltled 13125 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π)) β -β β€ ((πβπ) β (πβπ))) |
610 | | iooss1 13355 |
. . . . . . . . . . 11
β’
((-β β β* β§ -β β€ ((πβπ) β (πβπ))) β (((πβπ) β (πβπ))(,)π) β (-β(,)π)) |
611 | 194, 609,
610 | sylancr 587 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π)) β (((πβπ) β (πβπ))(,)π) β (-β(,)π)) |
612 | 611 | 3adant3 1132 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)π) β (-β(,)π)) |
613 | 612, 500 | ssind 4231 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)π) β ((-β(,)π) β© π·)) |
614 | 605, 231 | sstrid 3992 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((-β(,)π) β© π·) β β) |
615 | | eqid 2732 |
. . . . . . . 8
β’
((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})) = ((TopOpenββfld)
βΎt (((-β(,)π) β© π·) βͺ {π})) |
616 | 450 | 3adant3 1132 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ) β (πβπ)) β
β*) |
617 | 452 | 3ad2ant1 1133 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π β
β*) |
618 | 472 | 3ad2ant1 1133 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΈβπ) = (π + (πβπ))) |
619 | 238, 618 | breqtrd 5173 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (π + (πβπ))) |
620 | 408 | 3ad2ant1 1133 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) β β) |
621 | 14 | 3ad2ant1 1133 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π β β) |
622 | 211, 620,
621 | ltsubaddd 11806 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ)) < π β (πβπ) < (π + (πβπ)))) |
623 | 619, 622 | mpbird 256 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πβπ) β (πβπ)) < π) |
624 | 14 | leidd 11776 |
. . . . . . . . . . 11
β’ (π β π β€ π) |
625 | 624 | 3ad2ant1 1133 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π β€ π) |
626 | 616, 617,
617, 623, 625 | eliocd 44206 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π β (((πβπ) β (πβπ))(,]π)) |
627 | | ioounsn 13450 |
. . . . . . . . . . . 12
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ ((πβπ) β (πβπ)) < π) β ((((πβπ) β (πβπ))(,)π) βͺ {π}) = (((πβπ) β (πβπ))(,]π)) |
628 | 616, 617,
623, 627 | syl3anc 1371 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((((πβπ) β (πβπ))(,)π) βͺ {π}) = (((πβπ) β (πβπ))(,]π)) |
629 | 628 | fveq2d 6892 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β((((πβπ) β (πβπ))(,)π) βͺ {π})) =
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β(((πβπ) β (πβπ))(,]π))) |
630 | | ovex 7438 |
. . . . . . . . . . . . . 14
β’
(-β(,)π)
β V |
631 | 630 | inex1 5316 |
. . . . . . . . . . . . 13
β’
((-β(,)π)
β© π·) β
V |
632 | | snex 5430 |
. . . . . . . . . . . . 13
β’ {π} β V |
633 | 631, 632 | unex 7729 |
. . . . . . . . . . . 12
β’
(((-β(,)π)
β© π·) βͺ {π}) β V |
634 | | resttop 22655 |
. . . . . . . . . . . 12
β’
(((TopOpenββfld) β Top β§
(((-β(,)π) β©
π·) βͺ {π}) β V) β
((TopOpenββfld) βΎt (((-β(,)π) β© π·) βͺ {π})) β Top) |
635 | 244, 633,
634 | mp2an 690 |
. . . . . . . . . . 11
β’
((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})) β Top |
636 | 633 | a1i 11 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((-β(,)π) β© π·) βͺ {π}) β V) |
637 | | iooretop 24273 |
. . . . . . . . . . . . . 14
β’ (((πβπ) β (πβπ))(,)+β) β (topGenβran
(,)) |
638 | 637 | a1i 11 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,)+β) β (topGenβran
(,))) |
639 | | elrestr 17370 |
. . . . . . . . . . . . 13
β’
(((topGenβran (,)) β Top β§ (((-β(,)π) β© π·) βͺ {π}) β V β§ (((πβπ) β (πβπ))(,)+β) β (topGenβran
(,))) β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β ((topGenβran (,))
βΎt (((-β(,)π) β© π·) βͺ {π}))) |
640 | 252, 636,
638, 639 | syl3anc 1371 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β ((topGenβran (,))
βΎt (((-β(,)π) β© π·) βͺ {π}))) |
641 | 450 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β ((πβπ) β (πβπ)) β
β*) |
642 | 259 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β +β β
β*) |
643 | 14 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π β β) |
644 | | iocssre 13400 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((πβπ) β (πβπ)) β β* β§ π β β) β (((πβπ) β (πβπ))(,]π) β β) |
645 | 641, 643,
644 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β (((πβπ) β (πβπ))(,]π) β β) |
646 | | simpr 485 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β (((πβπ) β (πβπ))(,]π)) |
647 | 645, 646 | sseldd 3982 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β β) |
648 | 452 | ad2antrr 724 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π β
β*) |
649 | | iocgtlb 44201 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π₯ β (((πβπ) β (πβπ))(,]π)) β ((πβπ) β (πβπ)) < π₯) |
650 | 641, 648,
646, 649 | syl3anc 1371 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β ((πβπ) β (πβπ)) < π₯) |
651 | 647 | ltpnfd 13097 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ < +β) |
652 | 641, 642,
647, 650, 651 | eliood 44197 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β (((πβπ) β (πβπ))(,)+β)) |
653 | 652 | 3adantl3 1168 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β (((πβπ) β (πβπ))(,)+β)) |
654 | | eqvisset 3491 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = π β π β V) |
655 | | snidg 4661 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β V β π β {π}) |
656 | 654, 655 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β π β {π}) |
657 | 467, 656 | eqeltrd 2833 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β π₯ β {π}) |
658 | | elun2 4176 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ β {π} β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
659 | 657, 658 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
660 | 659 | adantl 482 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ π₯ = π) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
661 | | simpll 765 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β (π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1))))) |
662 | 641 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β ((πβπ) β (πβπ)) β
β*) |
663 | 452 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π β
β*) |
664 | 647 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ β β) |
665 | 650 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β ((πβπ) β (πβπ)) < π₯) |
666 | 14 | ad3antrrr 728 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π β β) |
667 | | iocleub 44202 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((πβπ) β (πβπ)) β β* β§ π β β*
β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β€ π) |
668 | 641, 648,
646, 667 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β€ π) |
669 | 668 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ β€ π) |
670 | 467 | eqcoms 2740 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π₯ β π₯ = π) |
671 | 670 | necon3bi 2967 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (Β¬
π₯ = π β π β π₯) |
672 | 671 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π β π₯) |
673 | 664, 666,
669, 672 | leneltd 11364 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ < π) |
674 | 662, 663,
664, 665, 673 | eliood 44197 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π β§ π β (0..^π)) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ β (((πβπ) β (πβπ))(,)π)) |
675 | 674 | 3adantll3 43711 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ β (((πβπ) β (πβπ))(,)π)) |
676 | 613 | sselda 3981 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β π₯ β ((-β(,)π) β© π·)) |
677 | | elun1 4175 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ β ((-β(,)π) β© π·) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
678 | 676, 677 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,)π)) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
679 | 661, 675,
678 | syl2anc 584 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β§ Β¬ π₯ = π) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
680 | 660, 679 | pm2.61dan 811 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
681 | 653, 680 | elind 4193 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β (((πβπ) β (πβπ))(,]π)) β π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) |
682 | 616 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β ((πβπ) β (πβπ)) β
β*) |
683 | 617 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π β
β*) |
684 | | elinel1 4194 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β π₯ β (((πβπ) β (πβπ))(,)+β)) |
685 | | elioore 13350 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ β (((πβπ) β (πβπ))(,)+β) β π₯ β β) |
686 | 684, 685 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β π₯ β β) |
687 | 686 | rexrd 11260 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β π₯ β β*) |
688 | 687 | adantl 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π₯ β β*) |
689 | 450 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β ((πβπ) β (πβπ)) β
β*) |
690 | 259 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β +β β
β*) |
691 | 684 | adantl 482 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (0..^π)) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π₯ β (((πβπ) β (πβπ))(,)+β)) |
692 | | ioogtlb 44194 |
. . . . . . . . . . . . . . . . 17
β’ ((((πβπ) β (πβπ)) β β* β§ +β
β β* β§ π₯ β (((πβπ) β (πβπ))(,)+β)) β ((πβπ) β (πβπ)) < π₯) |
693 | 689, 690,
691, 692 | syl3anc 1371 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (0..^π)) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β ((πβπ) β (πβπ)) < π₯) |
694 | 693 | 3adantl3 1168 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β ((πβπ) β (πβπ)) < π₯) |
695 | | elinel2 4195 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})) β π₯ β (((-β(,)π) β© π·) βͺ {π})) |
696 | | elsni 4644 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ β {π} β π₯ = π) |
697 | 696 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β {π}) β π₯ = π) |
698 | 624 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β {π}) β π β€ π) |
699 | 697, 698 | eqbrtrd 5169 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π₯ β {π}) β π₯ β€ π) |
700 | 699 | adantlr 713 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β§ π₯ β {π}) β π₯ β€ π) |
701 | | simpll 765 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β§ Β¬ π₯ β {π}) β π) |
702 | | elunnel2 4149 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π₯ β (((-β(,)π) β© π·) βͺ {π}) β§ Β¬ π₯ β {π}) β π₯ β ((-β(,)π) β© π·)) |
703 | 702 | adantll 712 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β§ Β¬ π₯ β {π}) β π₯ β ((-β(,)π) β© π·)) |
704 | | elinel1 4194 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ β ((-β(,)π) β© π·) β π₯ β (-β(,)π)) |
705 | 703, 704 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β§ Β¬ π₯ β {π}) β π₯ β (-β(,)π)) |
706 | | elioore 13350 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ β (-β(,)π) β π₯ β β) |
707 | 706 | adantl 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β (-β(,)π)) β π₯ β β) |
708 | 14 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β (-β(,)π)) β π β β) |
709 | 194 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)π)) β -β β
β*) |
710 | 452 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)π)) β π β
β*) |
711 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π₯ β (-β(,)π)) β π₯ β (-β(,)π)) |
712 | | iooltub 44209 |
. . . . . . . . . . . . . . . . . . . . 21
β’
((-β β β* β§ π β β* β§ π₯ β (-β(,)π)) β π₯ < π) |
713 | 709, 710,
711, 712 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π₯ β (-β(,)π)) β π₯ < π) |
714 | 707, 708,
713 | ltled 11358 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π₯ β (-β(,)π)) β π₯ β€ π) |
715 | 701, 705,
714 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β§ Β¬ π₯ β {π}) β π₯ β€ π) |
716 | 700, 715 | pm2.61dan 811 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π₯ β (((-β(,)π) β© π·) βͺ {π})) β π₯ β€ π) |
717 | 695, 716 | sylan2 593 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π₯ β€ π) |
718 | 717 | 3ad2antl1 1185 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π₯ β€ π) |
719 | 682, 683,
688, 694, 718 | eliocd 44206 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β§ π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) β π₯ β (((πβπ) β (πβπ))(,]π)) |
720 | 681, 719 | impbida 799 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (π₯ β (((πβπ) β (πβπ))(,]π) β π₯ β ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π})))) |
721 | 720 | eqrdv 2730 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,]π) = ((((πβπ) β (πβπ))(,)+β) β© (((-β(,)π) β© π·) βͺ {π}))) |
722 | 605, 229 | sstrid 3992 |
. . . . . . . . . . . . . . 15
β’ (π β ((-β(,)π) β© π·) β β) |
723 | 14 | snssd 4811 |
. . . . . . . . . . . . . . 15
β’ (π β {π} β β) |
724 | 722, 723 | unssd 4185 |
. . . . . . . . . . . . . 14
β’ (π β (((-β(,)π) β© π·) βͺ {π}) β β) |
725 | 724 | 3ad2ant1 1133 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((-β(,)π) β© π·) βͺ {π}) β β) |
726 | 233, 366 | rerest 24311 |
. . . . . . . . . . . . 13
β’
((((-β(,)π)
β© π·) βͺ {π}) β β β
((TopOpenββfld) βΎt (((-β(,)π) β© π·) βͺ {π})) = ((topGenβran (,))
βΎt (((-β(,)π) β© π·) βͺ {π}))) |
727 | 725, 726 | syl 17 |
. . . . . . . . . . . 12
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((TopOpenββfld) βΎt (((-β(,)π) β© π·) βͺ {π})) = ((topGenβran (,))
βΎt (((-β(,)π) β© π·) βͺ {π}))) |
728 | 640, 721,
727 | 3eltr4d 2848 |
. . . . . . . . . . 11
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,]π) β
((TopOpenββfld) βΎt (((-β(,)π) β© π·) βͺ {π}))) |
729 | | isopn3i 22577 |
. . . . . . . . . . 11
β’
((((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})) β Top β§ (((πβπ) β (πβπ))(,]π) β
((TopOpenββfld) βΎt (((-β(,)π) β© π·) βͺ {π}))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β(((πβπ) β (πβπ))(,]π)) = (((πβπ) β (πβπ))(,]π)) |
730 | 635, 728,
729 | sylancr 587 |
. . . . . . . . . 10
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β(((πβπ) β (πβπ))(,]π)) = (((πβπ) β (πβπ))(,]π)) |
731 | 629, 730 | eqtr2d 2773 |
. . . . . . . . 9
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πβπ) β (πβπ))(,]π) =
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β((((πβπ) β (πβπ))(,)π) βͺ {π}))) |
732 | 626, 731 | eleqtrd 2835 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β π β
((intβ((TopOpenββfld) βΎt
(((-β(,)π) β©
π·) βͺ {π})))β((((πβπ) β (πβπ))(,)π) βͺ {π}))) |
733 | 607, 613,
614, 233, 615, 732 | limcres 25394 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πΉ βΎ ((-β(,)π) β© π·)) βΎ (((πβπ) β (πβπ))(,)π)) limβ π) = ((πΉ βΎ ((-β(,)π) β© π·)) limβ π)) |
734 | 733 | eqcomd 2738 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((-β(,)π) β© π·)) limβ π) = (((πΉ βΎ ((-β(,)π) β© π·)) βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
735 | 613 | resabs1d 6010 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((-β(,)π) β© π·)) βΎ (((πβπ) β (πβπ))(,)π)) = (πΉ βΎ (((πβπ) β (πβπ))(,)π))) |
736 | 735 | oveq1d 7420 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πΉ βΎ ((-β(,)π) β© π·)) βΎ (((πβπ) β (πβπ))(,)π)) limβ π) = ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π)) |
737 | 604, 734,
736 | 3eqtrrd 2777 |
. . . . 5
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (((πβπ) β (πβπ))(,)π)) limβ π) = ((πΉ βΎ (-β(,)π)) limβ π)) |
738 | 377, 596,
737 | 3eqtrrd 2777 |
. . . 4
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (-β(,)π)) limβ π) = ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ))) |
739 | 738 | rexlimdv3a 3159 |
. . 3
β’ (π β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))) β ((πΉ βΎ (-β(,)π)) limβ π) = ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)))) |
740 | 173, 739 | mpd 15 |
. 2
β’ (π β ((πΉ βΎ (-β(,)π)) limβ π) = ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ))) |
741 | 120 | 3adant3 1132 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πβπ) < (πβ(π + 1))) |
742 | 218 | 3adant3 1132 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) β (((πβπ)(,)(πβ(π + 1)))βcnββ)) |
743 | | fourierdlem49.l |
. . . . . . . . 9
β’ ((π β§ π β (0..^π)) β πΏ β ((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) limβ (πβ(π + 1)))) |
744 | 743 | 3adant3 1132 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β πΏ β ((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) limβ (πβ(π + 1)))) |
745 | | eqid 2732 |
. . . . . . . 8
β’ if((πΈβπ) = (πβ(π + 1)), πΏ, ((πΉ βΎ ((πβπ)(,)(πβ(π + 1))))β(πΈβπ))) = if((πΈβπ) = (πβ(π + 1)), πΏ, ((πΉ βΎ ((πβπ)(,)(πβ(π + 1))))β(πΈβπ))) |
746 | | eqid 2732 |
. . . . . . . 8
β’
((TopOpenββfld) βΎt (((πβπ)(,)(πβ(π + 1))) βͺ {(πβ(π + 1))})) =
((TopOpenββfld) βΎt (((πβπ)(,)(πβ(π + 1))) βͺ {(πβ(π + 1))})) |
747 | 211, 209,
741, 742, 744, 211, 235, 238, 217, 745, 746 | fourierdlem33 44842 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β if((πΈβπ) = (πβ(π + 1)), πΏ, ((πΉ βΎ ((πβπ)(,)(πβ(π + 1))))β(πΈβπ))) β (((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
748 | 217 | resabs1d 6010 |
. . . . . . . 8
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) βΎ ((πβπ)(,)(πΈβπ))) = (πΉ βΎ ((πβπ)(,)(πΈβπ)))) |
749 | 748 | oveq1d 7420 |
. . . . . . 7
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β (((πΉ βΎ ((πβπ)(,)(πβ(π + 1)))) βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) = ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
750 | 747, 749 | eleqtrd 2835 |
. . . . . 6
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β if((πΈβπ) = (πβ(π + 1)), πΏ, ((πΉ βΎ ((πβπ)(,)(πβ(π + 1))))β(πΈβπ))) β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ))) |
751 | | ne0i 4333 |
. . . . . 6
β’
(if((πΈβπ) = (πβ(π + 1)), πΏ, ((πΉ βΎ ((πβπ)(,)(πβ(π + 1))))β(πΈβπ))) β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) β β
) |
752 | 750, 751 | syl 17 |
. . . . 5
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ ((πβπ)(,)(πΈβπ))) limβ (πΈβπ)) β β
) |
753 | 377, 752 | eqnetrd 3008 |
. . . 4
β’ ((π β§ π β (0..^π) β§ (πΈβπ) β ((πβπ)(,](πβ(π + 1)))) β ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)) β β
) |
754 | 753 | rexlimdv3a 3159 |
. . 3
β’ (π β (βπ β (0..^π)(πΈβπ) β ((πβπ)(,](πβ(π + 1))) β ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)) β β
)) |
755 | 173, 754 | mpd 15 |
. 2
β’ (π β ((πΉ βΎ (-β(,)(πΈβπ))) limβ (πΈβπ)) β β
) |
756 | 740, 755 | eqnetrd 3008 |
1
β’ (π β ((πΉ βΎ (-β(,)π)) limβ π) β β
) |