MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ang180lem1 Structured version   Visualization version   GIF version

Theorem ang180lem1 26790
Description: Lemma for ang180 26795. Show that the "revolution number" 𝑁 is an integer, using efeq1 26509 to show that since the product of the three arguments 𝐴, 1 / (1 − 𝐴), (𝐴 − 1) / 𝐴 is -1, the sum of the logarithms must be an integer multiple of 2πi away from πi = log(-1). (Contributed by Mario Carneiro, 23-Sep-2014.)
Hypotheses
Ref Expression
ang.1 𝐹 = (𝑥 ∈ (ℂ ∖ {0}), 𝑦 ∈ (ℂ ∖ {0}) ↦ (ℑ‘(log‘(𝑦 / 𝑥))))
ang180lem1.2 𝑇 = (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))
ang180lem1.3 𝑁 = (((𝑇 / i) / (2 · π)) − (1 / 2))
Assertion
Ref Expression
ang180lem1 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 ∈ ℤ ∧ (𝑇 / i) ∈ ℝ))
Distinct variable group:   𝑥,𝑦,𝐴
Allowed substitution hints:   𝑇(𝑥,𝑦)   𝐹(𝑥,𝑦)   𝑁(𝑥,𝑦)

Proof of Theorem ang180lem1
StepHypRef Expression
1 picn 26439 . . . . . . 7 π ∈ ℂ
2 2re 12250 . . . . . . . . . 10 2 ∈ ℝ
3 pire 26438 . . . . . . . . . 10 π ∈ ℝ
42, 3remulcli 11156 . . . . . . . . 9 (2 · π) ∈ ℝ
54recni 11154 . . . . . . . 8 (2 · π) ∈ ℂ
6 2pos 12279 . . . . . . . . . 10 0 < 2
7 pipos 26440 . . . . . . . . . 10 0 < π
82, 3, 6, 7mulgt0ii 11274 . . . . . . . . 9 0 < (2 · π)
94, 8gt0ne0ii 11681 . . . . . . . 8 (2 · π) ≠ 0
105, 9pm3.2i 470 . . . . . . 7 ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)
11 ax-icn 11092 . . . . . . . 8 i ∈ ℂ
12 ine0 11580 . . . . . . . 8 i ≠ 0
1311, 12pm3.2i 470 . . . . . . 7 (i ∈ ℂ ∧ i ≠ 0)
14 divcan5 11852 . . . . . . 7 ((π ∈ ℂ ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (i ∈ ℂ ∧ i ≠ 0)) → ((i · π) / (i · (2 · π))) = (π / (2 · π)))
151, 10, 13, 14mp3an 1464 . . . . . 6 ((i · π) / (i · (2 · π))) = (π / (2 · π))
163, 7gt0ne0ii 11681 . . . . . . 7 π ≠ 0
17 recdiv 11856 . . . . . . 7 ((((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → (1 / ((2 · π) / π)) = (π / (2 · π)))
185, 9, 1, 16, 17mp4an 694 . . . . . 6 (1 / ((2 · π) / π)) = (π / (2 · π))
192recni 11154 . . . . . . . 8 2 ∈ ℂ
2019, 1, 16divcan4i 11897 . . . . . . 7 ((2 · π) / π) = 2
2120oveq2i 7373 . . . . . 6 (1 / ((2 · π) / π)) = (1 / 2)
2215, 18, 213eqtr2i 2766 . . . . 5 ((i · π) / (i · (2 · π))) = (1 / 2)
2322oveq2i 7373 . . . 4 ((𝑇 / (i · (2 · π))) − ((i · π) / (i · (2 · π)))) = ((𝑇 / (i · (2 · π))) − (1 / 2))
24 ang180lem1.2 . . . . . 6 𝑇 = (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))
25 ax-1cn 11091 . . . . . . . . . . 11 1 ∈ ℂ
26 simp1 1137 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ∈ ℂ)
27 subcl 11387 . . . . . . . . . . 11 ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (1 − 𝐴) ∈ ℂ)
2825, 26, 27sylancr 588 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ∈ ℂ)
29 simp3 1139 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ≠ 1)
3029necomd 2988 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ≠ 𝐴)
31 subeq0 11415 . . . . . . . . . . . . 13 ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
3225, 26, 31sylancr 588 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
3332necon3bid 2977 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) ≠ 0 ↔ 1 ≠ 𝐴))
3430, 33mpbird 257 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ≠ 0)
3528, 34reccld 11919 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ∈ ℂ)
3628, 34recne0d 11920 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ≠ 0)
3735, 36logcld 26551 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘(1 / (1 − 𝐴))) ∈ ℂ)
38 subcl 11387 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 − 1) ∈ ℂ)
3926, 25, 38sylancl 587 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝐴 − 1) ∈ ℂ)
40 simp2 1138 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ≠ 0)
4139, 26, 40divcld 11926 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ∈ ℂ)
42 subeq0 11415 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
4326, 25, 42sylancl 587 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
4443necon3bid 2977 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) ≠ 0 ↔ 𝐴 ≠ 1))
4529, 44mpbird 257 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝐴 − 1) ≠ 0)
4639, 26, 45, 40divne0d 11942 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ≠ 0)
4741, 46logcld 26551 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘((𝐴 − 1) / 𝐴)) ∈ ℂ)
4837, 47addcld 11159 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) ∈ ℂ)
4926, 40logcld 26551 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘𝐴) ∈ ℂ)
5048, 49addcld 11159 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)) ∈ ℂ)
5124, 50eqeltrid 2841 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑇 ∈ ℂ)
5211, 1mulcli 11147 . . . . . 6 (i · π) ∈ ℂ
5352a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · π) ∈ ℂ)
5411, 5mulcli 11147 . . . . . 6 (i · (2 · π)) ∈ ℂ
5554a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ∈ ℂ)
5611, 5, 12, 9mulne0i 11788 . . . . . 6 (i · (2 · π)) ≠ 0
5756a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ≠ 0)
5851, 53, 55, 57divsubdird 11965 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) = ((𝑇 / (i · (2 · π))) − ((i · π) / (i · (2 · π)))))
59 ang180lem1.3 . . . . 5 𝑁 = (((𝑇 / i) / (2 · π)) − (1 / 2))
6013a1i 11 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i ∈ ℂ ∧ i ≠ 0))
6110a1i 11 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0))
62 divdiv1 11861 . . . . . . 7 ((𝑇 ∈ ℂ ∧ (i ∈ ℂ ∧ i ≠ 0) ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
6351, 60, 61, 62syl3anc 1374 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
6463oveq1d 7377 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) − (1 / 2)) = ((𝑇 / (i · (2 · π))) − (1 / 2)))
6559, 64eqtrid 2784 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 = ((𝑇 / (i · (2 · π))) − (1 / 2)))
6623, 58, 653eqtr4a 2798 . . 3 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) = 𝑁)
67 efsub 16062 . . . . . 6 ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
6851, 52, 67sylancl 587 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
69 efipi 26454 . . . . . . 7 (exp‘(i · π)) = -1
7069oveq2i 7373 . . . . . 6 ((exp‘𝑇) / (exp‘(i · π))) = ((exp‘𝑇) / -1)
7124fveq2i 6839 . . . . . . . . 9 (exp‘𝑇) = (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)))
72 efadd 16054 . . . . . . . . . . 11 ((((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) ∈ ℂ ∧ (log‘𝐴) ∈ ℂ) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))))
7348, 49, 72syl2anc 585 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))))
74 efadd 16054 . . . . . . . . . . . . 13 (((log‘(1 / (1 − 𝐴))) ∈ ℂ ∧ (log‘((𝐴 − 1) / 𝐴)) ∈ ℂ) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))))
7537, 47, 74syl2anc 585 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))))
76 eflog 26557 . . . . . . . . . . . . . 14 (((1 / (1 − 𝐴)) ∈ ℂ ∧ (1 / (1 − 𝐴)) ≠ 0) → (exp‘(log‘(1 / (1 − 𝐴)))) = (1 / (1 − 𝐴)))
7735, 36, 76syl2anc 585 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘(1 / (1 − 𝐴)))) = (1 / (1 − 𝐴)))
78 eflog 26557 . . . . . . . . . . . . . 14 ((((𝐴 − 1) / 𝐴) ∈ ℂ ∧ ((𝐴 − 1) / 𝐴) ≠ 0) → (exp‘(log‘((𝐴 − 1) / 𝐴))) = ((𝐴 − 1) / 𝐴))
7941, 46, 78syl2anc 585 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘((𝐴 − 1) / 𝐴))) = ((𝐴 − 1) / 𝐴))
8077, 79oveq12d 7380 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))) = ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)))
8135, 41mulcomd 11161 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))))
8225a1i 11 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ∈ ℂ)
8382, 28, 34div2negd 11941 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (-1 / -(1 − 𝐴)) = (1 / (1 − 𝐴)))
84 negsubdi2 11448 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → -(1 − 𝐴) = (𝐴 − 1))
8525, 26, 84sylancr 588 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -(1 − 𝐴) = (𝐴 − 1))
8685oveq2d 7378 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (-1 / -(1 − 𝐴)) = (-1 / (𝐴 − 1)))
8783, 86eqtr3d 2774 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) = (-1 / (𝐴 − 1)))
8887oveq2d 7378 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))) = (((𝐴 − 1) / 𝐴) · (-1 / (𝐴 − 1))))
89 neg1cn 12139 . . . . . . . . . . . . . . 15 -1 ∈ ℂ
9089a1i 11 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -1 ∈ ℂ)
9190, 39, 26, 45, 40dmdcand 11955 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · (-1 / (𝐴 − 1))) = (-1 / 𝐴))
9281, 88, 913eqtrd 2776 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = (-1 / 𝐴))
9375, 80, 923eqtrd 2776 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = (-1 / 𝐴))
94 eflog 26557 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(log‘𝐴)) = 𝐴)
9526, 40, 94syl2anc 585 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘𝐴)) = 𝐴)
9693, 95oveq12d 7380 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))) = ((-1 / 𝐴) · 𝐴))
9790, 26, 40divcan1d 11927 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((-1 / 𝐴) · 𝐴) = -1)
9873, 96, 973eqtrd 2776 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = -1)
9971, 98eqtrid 2784 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘𝑇) = -1)
10099oveq1d 7377 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = (-1 / -1))
101 neg1ne0 12141 . . . . . . . 8 -1 ≠ 0
10289, 101dividi 11883 . . . . . . 7 (-1 / -1) = 1
103100, 102eqtrdi 2788 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = 1)
10470, 103eqtrid 2784 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / (exp‘(i · π))) = 1)
10568, 104eqtrd 2772 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = 1)
106 subcl 11387 . . . . . 6 ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (𝑇 − (i · π)) ∈ ℂ)
10751, 52, 106sylancl 587 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 − (i · π)) ∈ ℂ)
108 efeq1 26509 . . . . 5 ((𝑇 − (i · π)) ∈ ℂ → ((exp‘(𝑇 − (i · π))) = 1 ↔ ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ))
109107, 108syl 17 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘(𝑇 − (i · π))) = 1 ↔ ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ))
110105, 109mpbid 232 . . 3 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ)
11166, 110eqeltrrd 2838 . 2 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 ∈ ℤ)
11211a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → i ∈ ℂ)
11312a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → i ≠ 0)
11451, 112, 113divcld 11926 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 / i) ∈ ℂ)
1155a1i 11 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (2 · π) ∈ ℂ)
1169a1i 11 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (2 · π) ≠ 0)
117114, 115, 116divcan1d 11927 . . 3 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) = (𝑇 / i))
11859oveq1i 7372 . . . . . 6 (𝑁 + (1 / 2)) = ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2))
119114, 115, 116divcld 11926 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℂ)
120 halfre 12385 . . . . . . . 8 (1 / 2) ∈ ℝ
121120recni 11154 . . . . . . 7 (1 / 2) ∈ ℂ
122 npcan 11397 . . . . . . 7 ((((𝑇 / i) / (2 · π)) ∈ ℂ ∧ (1 / 2) ∈ ℂ) → ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2)) = ((𝑇 / i) / (2 · π)))
123119, 121, 122sylancl 587 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2)) = ((𝑇 / i) / (2 · π)))
124118, 123eqtrid 2784 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) = ((𝑇 / i) / (2 · π)))
125111zred 12628 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 ∈ ℝ)
126 readdcl 11116 . . . . . 6 ((𝑁 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (𝑁 + (1 / 2)) ∈ ℝ)
127125, 120, 126sylancl 587 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) ∈ ℝ)
128124, 127eqeltrrd 2838 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℝ)
129 remulcl 11118 . . . 4 ((((𝑇 / i) / (2 · π)) ∈ ℝ ∧ (2 · π) ∈ ℝ) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
130128, 4, 129sylancl 587 . . 3 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
131117, 130eqeltrrd 2838 . 2 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 / i) ∈ ℝ)
132111, 131jca 511 1 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 ∈ ℤ ∧ (𝑇 / i) ∈ ℝ))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933  cdif 3887  {csn 4568  cfv 6494  (class class class)co 7362  cmpo 7364  cc 11031  cr 11032  0cc0 11033  1c1 11034  ici 11035   + caddc 11036   · cmul 11038  cmin 11372  -cneg 11373   / cdiv 11802  2c2 12231  cz 12519  cim 15055  expce 16021  πcpi 16026  logclog 26535
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5304  ax-pr 5372  ax-un 7684  ax-inf2 9557  ax-cnex 11089  ax-resscn 11090  ax-1cn 11091  ax-icn 11092  ax-addcl 11093  ax-addrcl 11094  ax-mulcl 11095  ax-mulrcl 11096  ax-mulcom 11097  ax-addass 11098  ax-mulass 11099  ax-distr 11100  ax-i2m1 11101  ax-1ne0 11102  ax-1rid 11103  ax-rnegex 11104  ax-rrecex 11105  ax-cnre 11106  ax-pre-lttri 11107  ax-pre-lttrn 11108  ax-pre-ltadd 11109  ax-pre-mulgt0 11110  ax-pre-sup 11111  ax-addf 11112
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5521  df-eprel 5526  df-po 5534  df-so 5535  df-fr 5579  df-se 5580  df-we 5581  df-xp 5632  df-rel 5633  df-cnv 5634  df-co 5635  df-dm 5636  df-rn 5637  df-res 5638  df-ima 5639  df-pred 6261  df-ord 6322  df-on 6323  df-lim 6324  df-suc 6325  df-iota 6450  df-fun 6496  df-fn 6497  df-f 6498  df-f1 6499  df-fo 6500  df-f1o 6501  df-fv 6502  df-isom 6503  df-riota 7319  df-ov 7365  df-oprab 7366  df-mpo 7367  df-of 7626  df-om 7813  df-1st 7937  df-2nd 7938  df-supp 8106  df-frecs 8226  df-wrecs 8257  df-recs 8306  df-rdg 8344  df-1o 8400  df-2o 8401  df-er 8638  df-map 8770  df-pm 8771  df-ixp 8841  df-en 8889  df-dom 8890  df-sdom 8891  df-fin 8892  df-fsupp 9270  df-fi 9319  df-sup 9350  df-inf 9351  df-oi 9420  df-card 9858  df-pnf 11176  df-mnf 11177  df-xr 11178  df-ltxr 11179  df-le 11180  df-sub 11374  df-neg 11375  df-div 11803  df-nn 12170  df-2 12239  df-3 12240  df-4 12241  df-5 12242  df-6 12243  df-7 12244  df-8 12245  df-9 12246  df-n0 12433  df-z 12520  df-dec 12640  df-uz 12784  df-q 12894  df-rp 12938  df-xneg 13058  df-xadd 13059  df-xmul 13060  df-ioo 13297  df-ioc 13298  df-ico 13299  df-icc 13300  df-fz 13457  df-fzo 13604  df-fl 13746  df-mod 13824  df-seq 13959  df-exp 14019  df-fac 14231  df-bc 14260  df-hash 14288  df-shft 15024  df-cj 15056  df-re 15057  df-im 15058  df-sqrt 15192  df-abs 15193  df-limsup 15428  df-clim 15445  df-rlim 15446  df-sum 15644  df-ef 16027  df-sin 16029  df-cos 16030  df-pi 16032  df-struct 17112  df-sets 17129  df-slot 17147  df-ndx 17159  df-base 17175  df-ress 17196  df-plusg 17228  df-mulr 17229  df-starv 17230  df-sca 17231  df-vsca 17232  df-ip 17233  df-tset 17234  df-ple 17235  df-ds 17237  df-unif 17238  df-hom 17239  df-cco 17240  df-rest 17380  df-topn 17381  df-0g 17399  df-gsum 17400  df-topgen 17401  df-pt 17402  df-prds 17405  df-xrs 17461  df-qtop 17466  df-imas 17467  df-xps 17469  df-mre 17543  df-mrc 17544  df-acs 17546  df-mgm 18603  df-sgrp 18682  df-mnd 18698  df-submnd 18747  df-mulg 19039  df-cntz 19287  df-cmn 19752  df-psmet 21340  df-xmet 21341  df-met 21342  df-bl 21343  df-mopn 21344  df-fbas 21345  df-fg 21346  df-cnfld 21349  df-top 22873  df-topon 22890  df-topsp 22912  df-bases 22925  df-cld 22998  df-ntr 22999  df-cls 23000  df-nei 23077  df-lp 23115  df-perf 23116  df-cn 23206  df-cnp 23207  df-haus 23294  df-tx 23541  df-hmeo 23734  df-fil 23825  df-fm 23917  df-flim 23918  df-flf 23919  df-xms 24299  df-ms 24300  df-tms 24301  df-cncf 24859  df-limc 25847  df-dv 25848  df-log 26537
This theorem is referenced by:  ang180lem2  26791  ang180lem3  26792
  Copyright terms: Public domain W3C validator