Proof of Theorem itgsin0pilem1
Step | Hyp | Ref
| Expression |
1 | | itgsin0pilem1.1 |
. . . . . . . . . . 11
⊢ 𝐶 = (𝑡 ∈ (0[,]π) ↦ -(cos‘𝑡)) |
2 | | fveq2 6756 |
. . . . . . . . . . . . 13
⊢ (𝑡 = 𝑥 → (cos‘𝑡) = (cos‘𝑥)) |
3 | 2 | negeqd 11145 |
. . . . . . . . . . . 12
⊢ (𝑡 = 𝑥 → -(cos‘𝑡) = -(cos‘𝑥)) |
4 | 3 | cbvmptv 5183 |
. . . . . . . . . . 11
⊢ (𝑡 ∈ (0[,]π) ↦
-(cos‘𝑡)) = (𝑥 ∈ (0[,]π) ↦
-(cos‘𝑥)) |
5 | 1, 4 | eqtri 2766 |
. . . . . . . . . 10
⊢ 𝐶 = (𝑥 ∈ (0[,]π) ↦ -(cos‘𝑥)) |
6 | 5 | oveq2i 7266 |
. . . . . . . . 9
⊢ (ℝ
D 𝐶) = (ℝ D (𝑥 ∈ (0[,]π) ↦
-(cos‘𝑥))) |
7 | | ax-resscn 10859 |
. . . . . . . . . . . 12
⊢ ℝ
⊆ ℂ |
8 | 7 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ ℝ ⊆ ℂ) |
9 | | 0re 10908 |
. . . . . . . . . . . . 13
⊢ 0 ∈
ℝ |
10 | | pire 25520 |
. . . . . . . . . . . . 13
⊢ π
∈ ℝ |
11 | | iccssre 13090 |
. . . . . . . . . . . . 13
⊢ ((0
∈ ℝ ∧ π ∈ ℝ) → (0[,]π) ⊆
ℝ) |
12 | 9, 10, 11 | mp2an 688 |
. . . . . . . . . . . 12
⊢
(0[,]π) ⊆ ℝ |
13 | 12 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ (0[,]π) ⊆ ℝ) |
14 | 12, 7 | sstri 3926 |
. . . . . . . . . . . . . . 15
⊢
(0[,]π) ⊆ ℂ |
15 | 14 | sseli 3913 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ (0[,]π) → 𝑥 ∈
ℂ) |
16 | 15 | coscld 15768 |
. . . . . . . . . . . . 13
⊢ (𝑥 ∈ (0[,]π) →
(cos‘𝑥) ∈
ℂ) |
17 | 16 | adantl 481 |
. . . . . . . . . . . 12
⊢
((⊤ ∧ 𝑥
∈ (0[,]π)) → (cos‘𝑥) ∈ ℂ) |
18 | 17 | negcld 11249 |
. . . . . . . . . . 11
⊢
((⊤ ∧ 𝑥
∈ (0[,]π)) → -(cos‘𝑥) ∈ ℂ) |
19 | | eqid 2738 |
. . . . . . . . . . . 12
⊢
(TopOpen‘ℂfld) =
(TopOpen‘ℂfld) |
20 | 19 | tgioo2 23872 |
. . . . . . . . . . 11
⊢
(topGen‘ran (,)) = ((TopOpen‘ℂfld)
↾t ℝ) |
21 | | iccntr 23890 |
. . . . . . . . . . . . 13
⊢ ((0
∈ ℝ ∧ π ∈ ℝ) → ((int‘(topGen‘ran
(,)))‘(0[,]π)) = (0(,)π)) |
22 | 9, 10, 21 | mp2an 688 |
. . . . . . . . . . . 12
⊢
((int‘(topGen‘ran (,)))‘(0[,]π)) =
(0(,)π) |
23 | 22 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ ((int‘(topGen‘ran (,)))‘(0[,]π)) =
(0(,)π)) |
24 | 8, 13, 18, 20, 19, 23 | dvmptntr 25040 |
. . . . . . . . . 10
⊢ (⊤
→ (ℝ D (𝑥 ∈
(0[,]π) ↦ -(cos‘𝑥))) = (ℝ D (𝑥 ∈ (0(,)π) ↦ -(cos‘𝑥)))) |
25 | 24 | mptru 1546 |
. . . . . . . . 9
⊢ (ℝ
D (𝑥 ∈ (0[,]π)
↦ -(cos‘𝑥))) =
(ℝ D (𝑥 ∈
(0(,)π) ↦ -(cos‘𝑥))) |
26 | | reelprrecn 10894 |
. . . . . . . . . . . 12
⊢ ℝ
∈ {ℝ, ℂ} |
27 | 26 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ ℝ ∈ {ℝ, ℂ}) |
28 | | recn 10892 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ ℝ → 𝑥 ∈
ℂ) |
29 | 28 | coscld 15768 |
. . . . . . . . . . . . 13
⊢ (𝑥 ∈ ℝ →
(cos‘𝑥) ∈
ℂ) |
30 | 29 | adantl 481 |
. . . . . . . . . . . 12
⊢
((⊤ ∧ 𝑥
∈ ℝ) → (cos‘𝑥) ∈ ℂ) |
31 | 30 | negcld 11249 |
. . . . . . . . . . 11
⊢
((⊤ ∧ 𝑥
∈ ℝ) → -(cos‘𝑥) ∈ ℂ) |
32 | 28 | sincld 15767 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ ℝ →
(sin‘𝑥) ∈
ℂ) |
33 | 32 | adantl 481 |
. . . . . . . . . . 11
⊢
((⊤ ∧ 𝑥
∈ ℝ) → (sin‘𝑥) ∈ ℂ) |
34 | 32 | negcld 11249 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ ℝ →
-(sin‘𝑥) ∈
ℂ) |
35 | 34 | adantl 481 |
. . . . . . . . . . . . 13
⊢
((⊤ ∧ 𝑥
∈ ℝ) → -(sin‘𝑥) ∈ ℂ) |
36 | | dvcosre 43343 |
. . . . . . . . . . . . . 14
⊢ (ℝ
D (𝑥 ∈ ℝ ↦
(cos‘𝑥))) = (𝑥 ∈ ℝ ↦
-(sin‘𝑥)) |
37 | 36 | a1i 11 |
. . . . . . . . . . . . 13
⊢ (⊤
→ (ℝ D (𝑥 ∈
ℝ ↦ (cos‘𝑥))) = (𝑥 ∈ ℝ ↦ -(sin‘𝑥))) |
38 | 27, 30, 35, 37 | dvmptneg 25035 |
. . . . . . . . . . . 12
⊢ (⊤
→ (ℝ D (𝑥 ∈
ℝ ↦ -(cos‘𝑥))) = (𝑥 ∈ ℝ ↦ --(sin‘𝑥))) |
39 | 32 | negnegd 11253 |
. . . . . . . . . . . . 13
⊢ (𝑥 ∈ ℝ →
--(sin‘𝑥) =
(sin‘𝑥)) |
40 | 39 | mpteq2ia 5173 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ ℝ ↦
--(sin‘𝑥)) = (𝑥 ∈ ℝ ↦
(sin‘𝑥)) |
41 | 38, 40 | eqtrdi 2795 |
. . . . . . . . . . 11
⊢ (⊤
→ (ℝ D (𝑥 ∈
ℝ ↦ -(cos‘𝑥))) = (𝑥 ∈ ℝ ↦ (sin‘𝑥))) |
42 | | ioossre 13069 |
. . . . . . . . . . . 12
⊢
(0(,)π) ⊆ ℝ |
43 | 42 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ (0(,)π) ⊆ ℝ) |
44 | | iooretop 23835 |
. . . . . . . . . . . 12
⊢
(0(,)π) ∈ (topGen‘ran (,)) |
45 | 44 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ (0(,)π) ∈ (topGen‘ran (,))) |
46 | 27, 31, 33, 41, 43, 20, 19, 45 | dvmptres 25032 |
. . . . . . . . . 10
⊢ (⊤
→ (ℝ D (𝑥 ∈
(0(,)π) ↦ -(cos‘𝑥))) = (𝑥 ∈ (0(,)π) ↦ (sin‘𝑥))) |
47 | 46 | mptru 1546 |
. . . . . . . . 9
⊢ (ℝ
D (𝑥 ∈ (0(,)π)
↦ -(cos‘𝑥))) =
(𝑥 ∈ (0(,)π)
↦ (sin‘𝑥)) |
48 | 6, 25, 47 | 3eqtri 2770 |
. . . . . . . 8
⊢ (ℝ
D 𝐶) = (𝑥 ∈ (0(,)π) ↦ (sin‘𝑥)) |
49 | 48 | fveq1i 6757 |
. . . . . . 7
⊢ ((ℝ
D 𝐶)‘𝑥) = ((𝑥 ∈ (0(,)π) ↦ (sin‘𝑥))‘𝑥) |
50 | 42, 7 | sstri 3926 |
. . . . . . . . . 10
⊢
(0(,)π) ⊆ ℂ |
51 | 50 | sseli 3913 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0(,)π) → 𝑥 ∈
ℂ) |
52 | 51 | sincld 15767 |
. . . . . . . 8
⊢ (𝑥 ∈ (0(,)π) →
(sin‘𝑥) ∈
ℂ) |
53 | | eqid 2738 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0(,)π) ↦
(sin‘𝑥)) = (𝑥 ∈ (0(,)π) ↦
(sin‘𝑥)) |
54 | 53 | fvmpt2 6868 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0(,)π) ∧
(sin‘𝑥) ∈
ℂ) → ((𝑥 ∈
(0(,)π) ↦ (sin‘𝑥))‘𝑥) = (sin‘𝑥)) |
55 | 52, 54 | mpdan 683 |
. . . . . . 7
⊢ (𝑥 ∈ (0(,)π) →
((𝑥 ∈ (0(,)π)
↦ (sin‘𝑥))‘𝑥) = (sin‘𝑥)) |
56 | 49, 55 | syl5eq 2791 |
. . . . . 6
⊢ (𝑥 ∈ (0(,)π) →
((ℝ D 𝐶)‘𝑥) = (sin‘𝑥)) |
57 | 56 | adantl 481 |
. . . . 5
⊢
((⊤ ∧ 𝑥
∈ (0(,)π)) → ((ℝ D 𝐶)‘𝑥) = (sin‘𝑥)) |
58 | 57 | itgeq2dv 24851 |
. . . 4
⊢ (⊤
→ ∫(0(,)π)((ℝ D 𝐶)‘𝑥) d𝑥 = ∫(0(,)π)(sin‘𝑥) d𝑥) |
59 | 58 | mptru 1546 |
. . 3
⊢
∫(0(,)π)((ℝ D 𝐶)‘𝑥) d𝑥 = ∫(0(,)π)(sin‘𝑥) d𝑥 |
60 | 9 | a1i 11 |
. . . . 5
⊢ (⊤
→ 0 ∈ ℝ) |
61 | 10 | a1i 11 |
. . . . 5
⊢ (⊤
→ π ∈ ℝ) |
62 | | pipos 25522 |
. . . . . . 7
⊢ 0 <
π |
63 | 9, 10, 62 | ltleii 11028 |
. . . . . 6
⊢ 0 ≤
π |
64 | 63 | a1i 11 |
. . . . 5
⊢ (⊤
→ 0 ≤ π) |
65 | | nfcv 2906 |
. . . . . . 7
⊢
Ⅎ𝑥sin |
66 | | sincn 25508 |
. . . . . . . 8
⊢ sin
∈ (ℂ–cn→ℂ) |
67 | 66 | a1i 11 |
. . . . . . 7
⊢ (⊤
→ sin ∈ (ℂ–cn→ℂ)) |
68 | 50 | a1i 11 |
. . . . . . 7
⊢ (⊤
→ (0(,)π) ⊆ ℂ) |
69 | 65, 67, 68 | cncfmptss 43018 |
. . . . . 6
⊢ (⊤
→ (𝑥 ∈ (0(,)π)
↦ (sin‘𝑥))
∈ ((0(,)π)–cn→ℂ)) |
70 | 48, 69 | eqeltrid 2843 |
. . . . 5
⊢ (⊤
→ (ℝ D 𝐶) ∈
((0(,)π)–cn→ℂ)) |
71 | | ioossicc 13094 |
. . . . . . . 8
⊢
(0(,)π) ⊆ (0[,]π) |
72 | 71 | a1i 11 |
. . . . . . 7
⊢ (⊤
→ (0(,)π) ⊆ (0[,]π)) |
73 | | ioombl 24634 |
. . . . . . . 8
⊢
(0(,)π) ∈ dom vol |
74 | 73 | a1i 11 |
. . . . . . 7
⊢ (⊤
→ (0(,)π) ∈ dom vol) |
75 | 15 | sincld 15767 |
. . . . . . . 8
⊢ (𝑥 ∈ (0[,]π) →
(sin‘𝑥) ∈
ℂ) |
76 | 75 | adantl 481 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ (0[,]π)) → (sin‘𝑥) ∈ ℂ) |
77 | 14 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ (0[,]π) ⊆ ℂ) |
78 | 65, 67, 77 | cncfmptss 43018 |
. . . . . . . . . 10
⊢ (⊤
→ (𝑥 ∈ (0[,]π)
↦ (sin‘𝑥))
∈ ((0[,]π)–cn→ℂ)) |
79 | 78 | mptru 1546 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0[,]π) ↦
(sin‘𝑥)) ∈
((0[,]π)–cn→ℂ) |
80 | | cniccibl 24910 |
. . . . . . . . 9
⊢ ((0
∈ ℝ ∧ π ∈ ℝ ∧ (𝑥 ∈ (0[,]π) ↦ (sin‘𝑥)) ∈
((0[,]π)–cn→ℂ)) →
(𝑥 ∈ (0[,]π)
↦ (sin‘𝑥))
∈ 𝐿1) |
81 | 9, 10, 79, 80 | mp3an 1459 |
. . . . . . . 8
⊢ (𝑥 ∈ (0[,]π) ↦
(sin‘𝑥)) ∈
𝐿1 |
82 | 81 | a1i 11 |
. . . . . . 7
⊢ (⊤
→ (𝑥 ∈ (0[,]π)
↦ (sin‘𝑥))
∈ 𝐿1) |
83 | 72, 74, 76, 82 | iblss 24874 |
. . . . . 6
⊢ (⊤
→ (𝑥 ∈ (0(,)π)
↦ (sin‘𝑥))
∈ 𝐿1) |
84 | 48, 83 | eqeltrid 2843 |
. . . . 5
⊢ (⊤
→ (ℝ D 𝐶) ∈
𝐿1) |
85 | 16 | negcld 11249 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ (0[,]π) →
-(cos‘𝑥) ∈
ℂ) |
86 | | eqid 2738 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ ℂ ↦
-(cos‘𝑥)) = (𝑥 ∈ ℂ ↦
-(cos‘𝑥)) |
87 | 86 | fvmpt2 6868 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ ℂ ∧
-(cos‘𝑥) ∈
ℂ) → ((𝑥 ∈
ℂ ↦ -(cos‘𝑥))‘𝑥) = -(cos‘𝑥)) |
88 | 15, 85, 87 | syl2anc 583 |
. . . . . . . . . 10
⊢ (𝑥 ∈ (0[,]π) →
((𝑥 ∈ ℂ ↦
-(cos‘𝑥))‘𝑥) = -(cos‘𝑥)) |
89 | 88 | eqcomd 2744 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0[,]π) →
-(cos‘𝑥) = ((𝑥 ∈ ℂ ↦
-(cos‘𝑥))‘𝑥)) |
90 | 89 | mpteq2ia 5173 |
. . . . . . . 8
⊢ (𝑥 ∈ (0[,]π) ↦
-(cos‘𝑥)) = (𝑥 ∈ (0[,]π) ↦
((𝑥 ∈ ℂ ↦
-(cos‘𝑥))‘𝑥)) |
91 | | nfmpt1 5178 |
. . . . . . . . . 10
⊢
Ⅎ𝑥(𝑥 ∈ ℂ ↦ -(cos‘𝑥)) |
92 | | coscn 25509 |
. . . . . . . . . . . 12
⊢ cos
∈ (ℂ–cn→ℂ) |
93 | 86 | negfcncf 23992 |
. . . . . . . . . . . 12
⊢ (cos
∈ (ℂ–cn→ℂ)
→ (𝑥 ∈ ℂ
↦ -(cos‘𝑥))
∈ (ℂ–cn→ℂ)) |
94 | 92, 93 | ax-mp 5 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ ℂ ↦
-(cos‘𝑥)) ∈
(ℂ–cn→ℂ) |
95 | 94 | a1i 11 |
. . . . . . . . . 10
⊢ (⊤
→ (𝑥 ∈ ℂ
↦ -(cos‘𝑥))
∈ (ℂ–cn→ℂ)) |
96 | 91, 95, 77 | cncfmptss 43018 |
. . . . . . . . 9
⊢ (⊤
→ (𝑥 ∈ (0[,]π)
↦ ((𝑥 ∈ ℂ
↦ -(cos‘𝑥))‘𝑥)) ∈ ((0[,]π)–cn→ℂ)) |
97 | 96 | mptru 1546 |
. . . . . . . 8
⊢ (𝑥 ∈ (0[,]π) ↦
((𝑥 ∈ ℂ ↦
-(cos‘𝑥))‘𝑥)) ∈
((0[,]π)–cn→ℂ) |
98 | 90, 97 | eqeltri 2835 |
. . . . . . 7
⊢ (𝑥 ∈ (0[,]π) ↦
-(cos‘𝑥)) ∈
((0[,]π)–cn→ℂ) |
99 | 5, 98 | eqeltri 2835 |
. . . . . 6
⊢ 𝐶 ∈ ((0[,]π)–cn→ℂ) |
100 | 99 | a1i 11 |
. . . . 5
⊢ (⊤
→ 𝐶 ∈
((0[,]π)–cn→ℂ)) |
101 | 60, 61, 64, 70, 84, 100 | ftc2 25113 |
. . . 4
⊢ (⊤
→ ∫(0(,)π)((ℝ D 𝐶)‘𝑥) d𝑥 = ((𝐶‘π) − (𝐶‘0))) |
102 | 101 | mptru 1546 |
. . 3
⊢
∫(0(,)π)((ℝ D 𝐶)‘𝑥) d𝑥 = ((𝐶‘π) − (𝐶‘0)) |
103 | 59, 102 | eqtr3i 2768 |
. 2
⊢
∫(0(,)π)(sin‘𝑥) d𝑥 = ((𝐶‘π) − (𝐶‘0)) |
104 | | 0xr 10953 |
. . . . 5
⊢ 0 ∈
ℝ* |
105 | 10 | rexri 10964 |
. . . . 5
⊢ π
∈ ℝ* |
106 | | ubicc2 13126 |
. . . . 5
⊢ ((0
∈ ℝ* ∧ π ∈ ℝ* ∧ 0 ≤
π) → π ∈ (0[,]π)) |
107 | 104, 105,
63, 106 | mp3an 1459 |
. . . 4
⊢ π
∈ (0[,]π) |
108 | | fveq2 6756 |
. . . . . . . 8
⊢ (𝑡 = π → (cos‘𝑡) =
(cos‘π)) |
109 | | cospi 25534 |
. . . . . . . 8
⊢
(cos‘π) = -1 |
110 | 108, 109 | eqtrdi 2795 |
. . . . . . 7
⊢ (𝑡 = π → (cos‘𝑡) = -1) |
111 | 110 | negeqd 11145 |
. . . . . 6
⊢ (𝑡 = π → -(cos‘𝑡) = --1) |
112 | | ax-1cn 10860 |
. . . . . . . 8
⊢ 1 ∈
ℂ |
113 | 112 | a1i 11 |
. . . . . . 7
⊢ (𝑡 = π → 1 ∈
ℂ) |
114 | 113 | negnegd 11253 |
. . . . . 6
⊢ (𝑡 = π → --1 =
1) |
115 | 111, 114 | eqtrd 2778 |
. . . . 5
⊢ (𝑡 = π → -(cos‘𝑡) = 1) |
116 | | 1ex 10902 |
. . . . 5
⊢ 1 ∈
V |
117 | 115, 1, 116 | fvmpt 6857 |
. . . 4
⊢ (π
∈ (0[,]π) → (𝐶‘π) = 1) |
118 | 107, 117 | ax-mp 5 |
. . 3
⊢ (𝐶‘π) =
1 |
119 | | lbicc2 13125 |
. . . . . 6
⊢ ((0
∈ ℝ* ∧ π ∈ ℝ* ∧ 0 ≤
π) → 0 ∈ (0[,]π)) |
120 | 104, 105,
63, 119 | mp3an 1459 |
. . . . 5
⊢ 0 ∈
(0[,]π) |
121 | | fveq2 6756 |
. . . . . . 7
⊢ (𝑡 = 0 → (cos‘𝑡) =
(cos‘0)) |
122 | 121 | negeqd 11145 |
. . . . . 6
⊢ (𝑡 = 0 → -(cos‘𝑡) =
-(cos‘0)) |
123 | | negex 11149 |
. . . . . 6
⊢
-(cos‘0) ∈ V |
124 | 122, 1, 123 | fvmpt 6857 |
. . . . 5
⊢ (0 ∈
(0[,]π) → (𝐶‘0) = -(cos‘0)) |
125 | 120, 124 | ax-mp 5 |
. . . 4
⊢ (𝐶‘0) =
-(cos‘0) |
126 | | cos0 15787 |
. . . . 5
⊢
(cos‘0) = 1 |
127 | 126 | negeqi 11144 |
. . . 4
⊢
-(cos‘0) = -1 |
128 | 125, 127 | eqtri 2766 |
. . 3
⊢ (𝐶‘0) = -1 |
129 | 118, 128 | oveq12i 7267 |
. 2
⊢ ((𝐶‘π) − (𝐶‘0)) = (1 −
-1) |
130 | 112, 112 | subnegi 11230 |
. . 3
⊢ (1
− -1) = (1 + 1) |
131 | | 1p1e2 12028 |
. . 3
⊢ (1 + 1) =
2 |
132 | 130, 131 | eqtri 2766 |
. 2
⊢ (1
− -1) = 2 |
133 | 103, 129,
132 | 3eqtri 2770 |
1
⊢
∫(0(,)π)(sin‘𝑥) d𝑥 = 2 |