Theorem ang180lem1 27137

Description: Lemma for ang180 27142. Show that the "revolution number" 𝑁 is an integer, using efeq1 26856 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

Step	Hyp	Ref	Expression
1		picn 26785	. . . . . . 7 ⊢ π ∈ ℂ
2		2re 12417	. . . . . . . . . 10 ⊢ 2 ∈ ℝ
3		pire 26783	. . . . . . . . . 10 ⊢ π ∈ ℝ
4	2, 3	remulcli 11325	. . . . . . . . 9 ⊢ (2 · π) ∈ ℝ
5	4	recni 11323	. . . . . . . 8 ⊢ (2 · π) ∈ ℂ
6		2pos 12447	. . . . . . . . . 10 ⊢ 0 < 2
7		pipos 26787	. . . . . . . . . 10 ⊢ 0 < π
8	2, 3, 6, 7	mulgt0ii 11443	. . . . . . . . 9 ⊢ 0 < (2 · π)
9	4, 8	gt0ne0ii 11852	. . . . . . . 8 ⊢ (2 · π) ≠ 0
10	5, 9	pm3.2i 476	. . . . . . 7 ⊢ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)
11		ax-icn 11259	. . . . . . . 8 ⊢ i ∈ ℂ
12		ine0 11751	. . . . . . . 8 ⊢ i ≠ 0
13	11, 12	pm3.2i 476	. . . . . . 7 ⊢ (i ∈ ℂ ∧ i ≠ 0)
14		divcan5 12019	. . . . . . 7 ⊢ ((π ∈ ℂ ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (i ∈ ℂ ∧ i ≠ 0)) → ((i · π) / (i · (2 · π))) = (π / (2 · π)))
15	1, 10, 13, 14	mp3an 1490	. . . . . 6 ⊢ ((i · π) / (i · (2 · π))) = (π / (2 · π))
16	3, 7	gt0ne0ii 11852	. . . . . . 7 ⊢ π ≠ 0
17		recdiv 12023	. . . . . . 7 ⊢ ((((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → (1 / ((2 · π) / π)) = (π / (2 · π)))
18	5, 9, 1, 16, 17	mp4an 706	. . . . . 6 ⊢ (1 / ((2 · π) / π)) = (π / (2 · π))
19	2	recni 11323	. . . . . . . 8 ⊢ 2 ∈ ℂ
20	19, 1, 16	divcan4i 12064	. . . . . . 7 ⊢ ((2 · π) / π) = 2
21	20	oveq2i 7431	. . . . . 6 ⊢ (1 / ((2 · π) / π)) = (1 / 2)
22	15, 18, 21	3eqtr2i 2789	. . . . 5 ⊢ ((i · π) / (i · (2 · π))) = (1 / 2)
23	22	oveq2i 7431	. . . 4 ⊢ ((𝑇 / (i · (2 · π))) − ((i · π) / (i · (2 · π)))) = ((𝑇 / (i · (2 · π))) − (1 / 2))
24		ang180lem1.2	. . . . . 6 ⊢ 𝑇 = (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))
25		ax-1cn 11258	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
26		simp1 1154	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ∈ ℂ)
27		subcl 11556	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (1 − 𝐴) ∈ ℂ)
28	25, 26, 27	sylancr 599	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ∈ ℂ)
29		simp3 1156	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ≠ 1)
30	29	necomd 3010	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ≠ 𝐴)
31		subeq0 11584	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
32	25, 26, 31	sylancr 599	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
33	32	necon3bid 2999	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) ≠ 0 ↔ 1 ≠ 𝐴))
34	30, 33	mpbird 260	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ≠ 0)
35	28, 34	reccld 12086	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ∈ ℂ)
36	28, 34	recne0d 12087	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ≠ 0)
37	35, 36	logcld 26898	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘(1 / (1 − 𝐴))) ∈ ℂ)
38		subcl 11556	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 − 1) ∈ ℂ)
39	26, 25, 38	sylancl 598	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝐴 − 1) ∈ ℂ)
40		simp2 1155	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ≠ 0)
41	39, 26, 40	divcld 12093	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ∈ ℂ)
42		subeq0 11584	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
43	26, 25, 42	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
44	43	necon3bid 2999	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) ≠ 0 ↔ 𝐴 ≠ 1))
45	29, 44	mpbird 260	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝐴 − 1) ≠ 0)
46	39, 26, 45, 40	divne0d 12109	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ≠ 0)
47	41, 46	logcld 26898	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘((𝐴 − 1) / 𝐴)) ∈ ℂ)
48	37, 47	addcld 11328	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) ∈ ℂ)
49	26, 40	logcld 26898	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘𝐴) ∈ ℂ)
50	48, 49	addcld 11328	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)) ∈ ℂ)
51	24, 50	eqeltrid 2864	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑇 ∈ ℂ)
52	11, 1	mulcli 11316	. . . . . 6 ⊢ (i · π) ∈ ℂ
53	52	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · π) ∈ ℂ)
54	11, 5	mulcli 11316	. . . . . 6 ⊢ (i · (2 · π)) ∈ ℂ
55	54	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ∈ ℂ)
56	11, 5, 12, 9	mulne0i 11959	. . . . . 6 ⊢ (i · (2 · π)) ≠ 0
57	56	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ≠ 0)
58	51, 53, 55, 57	divsubdird 12132	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) = ((𝑇 / (i · (2 · π))) − ((i · π) / (i · (2 · π)))))
59		ang180lem1.3	. . . . 5 ⊢ 𝑁 = (((𝑇 / i) / (2 · π)) − (1 / 2))
60	13	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i ∈ ℂ ∧ i ≠ 0))
61	10	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0))
62		divdiv1 12028	. . . . . . 7 ⊢ ((𝑇 ∈ ℂ ∧ (i ∈ ℂ ∧ i ≠ 0) ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
63	51, 60, 61, 62	syl3anc 1398	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
64	63	oveq1d 7435	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) − (1 / 2)) = ((𝑇 / (i · (2 · π))) − (1 / 2)))
65	59, 64	eqtrid 2807	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 = ((𝑇 / (i · (2 · π))) − (1 / 2)))
66	23, 58, 65	3eqtr4a 2821	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) = 𝑁)
67		efsub 16268	. . . . . 6 ⊢ ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
68	51, 52, 67	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
69		efipi 26802	. . . . . . 7 ⊢ (exp‘(i · π)) = -1
70	69	oveq2i 7431	. . . . . 6 ⊢ ((exp‘𝑇) / (exp‘(i · π))) = ((exp‘𝑇) / -1)
71	24	fveq2i 6888	. . . . . . . . 9 ⊢ (exp‘𝑇) = (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)))
72		efadd 16260	. . . . . . . . . . 11 ⊢ ((((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) ∈ ℂ ∧ (log‘𝐴) ∈ ℂ) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))))
73	48, 49, 72	syl2anc 596	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))))
74		efadd 16260	. . . . . . . . . . . . 13 ⊢ (((log‘(1 / (1 − 𝐴))) ∈ ℂ ∧ (log‘((𝐴 − 1) / 𝐴)) ∈ ℂ) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))))
75	37, 47, 74	syl2anc 596	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))))
76		eflog 26904	. . . . . . . . . . . . . 14 ⊢ (((1 / (1 − 𝐴)) ∈ ℂ ∧ (1 / (1 − 𝐴)) ≠ 0) → (exp‘(log‘(1 / (1 − 𝐴)))) = (1 / (1 − 𝐴)))
77	35, 36, 76	syl2anc 596	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘(1 / (1 − 𝐴)))) = (1 / (1 − 𝐴)))
78		eflog 26904	. . . . . . . . . . . . . 14 ⊢ ((((𝐴 − 1) / 𝐴) ∈ ℂ ∧ ((𝐴 − 1) / 𝐴) ≠ 0) → (exp‘(log‘((𝐴 − 1) / 𝐴))) = ((𝐴 − 1) / 𝐴))
79	41, 46, 78	syl2anc 596	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘((𝐴 − 1) / 𝐴))) = ((𝐴 − 1) / 𝐴))
80	77, 79	oveq12d 7438	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))) = ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)))
81	35, 41	mulcomd 11330	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))))
82	25	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ∈ ℂ)
83	82, 28, 34	div2negd 12108	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ( -1 / -(1 − 𝐴)) = (1 / (1 − 𝐴)))
84		negsubdi2 11617	. . . . . . . . . . . . . . . . 17 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → -(1 − 𝐴) = (𝐴 − 1))
85	25, 26, 84	sylancr 599	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -(1 − 𝐴) = (𝐴 − 1))
86	85	oveq2d 7436	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ( -1 / -(1 − 𝐴)) = ( -1 / (𝐴 − 1)))
87	83, 86	eqtr3d 2797	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) = ( -1 / (𝐴 − 1)))
88	87	oveq2d 7436	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))) = (((𝐴 − 1) / 𝐴) · ( -1 / (𝐴 − 1))))
89		neg1cn 12305	. . . . . . . . . . . . . . 15 ⊢ -1 ∈ ℂ
90	89	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -1 ∈ ℂ)
91	90, 39, 26, 45, 40	dmdcand 12122	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · ( -1 / (𝐴 − 1))) = ( -1 / 𝐴))
92	81, 88, 91	3eqtrd 2799	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = ( -1 / 𝐴))
93	75, 80, 92	3eqtrd 2799	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ( -1 / 𝐴))
94		eflog 26904	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(log‘𝐴)) = 𝐴)
95	26, 40, 94	syl2anc 596	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘𝐴)) = 𝐴)
96	93, 95	oveq12d 7438	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))) = (( -1 / 𝐴) · 𝐴))
97	90, 26, 40	divcan1d 12094	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (( -1 / 𝐴) · 𝐴) = -1)
98	73, 96, 97	3eqtrd 2799	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = -1)
99	71, 98	eqtrid 2807	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘𝑇) = -1)
100	99	oveq1d 7435	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = ( -1 / -1))
101		neg1ne0 12307	. . . . . . . 8 ⊢ -1 ≠ 0
102	89, 101	dividi 12050	. . . . . . 7 ⊢ ( -1 / -1) = 1
103	100, 102	eqtrdi 2811	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = 1)
104	70, 103	eqtrid 2807	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / (exp‘(i · π))) = 1)
105	68, 104	eqtrd 2795	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = 1)
106		subcl 11556	. . . . . 6 ⊢ ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (𝑇 − (i · π)) ∈ ℂ)
107	51, 52, 106	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 − (i · π)) ∈ ℂ)
108		efeq1 26856	. . . . 5 ⊢ ((𝑇 − (i · π)) ∈ ℂ → ((exp‘(𝑇 − (i · π))) = 1 ↔ ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ))
109	107, 108	syl 18	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘(𝑇 − (i · π))) = 1 ↔ ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ))
110	105, 109	mpbid 235	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) ∈ ℤ)
111	66, 110	eqeltrrd 2861	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 ∈ ℤ)
112	11	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → i ∈ ℂ)
113	12	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → i ≠ 0)
114	51, 112, 113	divcld 12093	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 / i) ∈ ℂ)
115	5	a1i 11	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (2 · π) ∈ ℂ)
116	9	a1i 11	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (2 · π) ≠ 0)
117	114, 115, 116	divcan1d 12094	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) = (𝑇 / i))
118	59	oveq1i 7430	. . . . . 6 ⊢ (𝑁 + (1 / 2)) = ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2))
119	114, 115, 116	divcld 12093	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℂ)
120		halfre 12559	. . . . . . . 8 ⊢ (1 / 2) ∈ ℝ
121	120	recni 11323	. . . . . . 7 ⊢ (1 / 2) ∈ ℂ
122		npcan 11566	. . . . . . 7 ⊢ ((((𝑇 / i) / (2 · π)) ∈ ℂ ∧ (1 / 2) ∈ ℂ) → ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2)) = ((𝑇 / i) / (2 · π)))
123	119, 121, 122	sylancl 598	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2)) = ((𝑇 / i) / (2 · π)))
124	118, 123	eqtrid 2807	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) = ((𝑇 / i) / (2 · π)))
125	111	zred 12803	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 ∈ ℝ)
126		readdcl 11283	. . . . . 6 ⊢ ((𝑁 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (𝑁 + (1 / 2)) ∈ ℝ)
127	125, 120, 126	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) ∈ ℝ)
128	124, 127	eqeltrrd 2861	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℝ)
129		remulcl 11285	. . . 4 ⊢ ((((𝑇 / i) / (2 · π)) ∈ ℝ ∧ (2 · π) ∈ ℝ) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
130	128, 4, 129	sylancl 598	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
131	117, 130	eqeltrrd 2861	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 / i) ∈ ℝ)
132	111, 131	jca 521	1 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 ∈ ℤ ∧ (𝑇 / i) ∈ ℝ))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1569   ∈ wcel 2144   ≠ wne 2955   ∖ cdif 4045  {csn 4583  ‘cfv 6538  (class class class)co 7420   ∈ cmpo 7422  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201  ici 11202   + caddc 11203   · cmul 11205   − cmin 11541   -cneg 11542   / cdiv 11973  2c2 12397  ℤcz 12693  ℑcim 15265  expce 16227  πcpi 16232  logclog 26882

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9642  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278  ax-addf 11279

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-om 7878  df-1st 8001  df-2nd 8002  df-supp 8178  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-er 8717  df-map 8849  df-pm 8850  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-fsupp 9354  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9504  df-card 10020  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-4 12407  df-5 12408  df-6 12409  df-7 12410  df-8 12411  df-9 12412  df-n0 12607  df-z 12694  df-dec 12815  df-uz 12966  df-q 13076  df-rp 13121  df-xneg 13241  df-xadd 13242  df-xmul 13243  df-ioo 13480  df-ioc 13481  df-ico 13482  df-icc 13483  df-fz 13640  df-fzo 13789  df-fl 13932  df-mod 14010  df-seq 14145  df-exp 14205  df-fac 14418  df-bc 14447  df-hash 14475  df-shft 15220  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-limsup 15638  df-clim 15655  df-rlim 15656  df-sum 15854  df-ef 16233  df-sin 16235  df-cos 16236  df-pi 16238  df-struct 17325  df-sets 17342  df-slot 17360  df-ndx 17372  df-base 17388  df-ress 17409  df-plusg 17441  df-mulr 17442  df-starv 17443  df-sca 17444  df-vsca 17445  df-ip 17446  df-tset 17447  df-ple 17448  df-ds 17450  df-unif 17451  df-hom 17452  df-cco 17453  df-rest 17593  df-topn 17594  df-0g 17612  df-gsum 17613  df-topgen 17614  df-pt 17615  df-prds 17618  df-xrs 17674  df-qtop 17679  df-imas 17680  df-xps 17682  df-mre 17756  df-mrc 17757  df-acs 17759  df-mgm 18816  df-sgrp 18908  df-mnd 18924  df-submnd 18979  df-mulg 19278  df-cntz 19531  df-cmn 19996  df-psmet 21670  df-xmet 21671  df-met 21672  df-bl 21673  df-mopn 21674  df-fbas 21675  df-fg 21676  df-cnfld 21679  df-top 23212  df-topon 23229  df-topsp 23251  df-bases 23264  df-cld 23337  df-ntr 23338  df-cls 23339  df-nei 23416  df-lp 23454  df-perf 23455  df-cn 23545  df-cnp 23546  df-haus 23633  df-tx 23881  df-hmeo 24074  df-fil 24165  df-fm 24257  df-flim 24258  df-flf 24259  df-xms 24639  df-ms 24640  df-tms 24641  df-cncf 25199  df-limc 26186  df-dv 26187  df-log 26884

This theorem is used by:  ang180lem2  27138  ang180lem3  27139