Theorem ang180lem1 27164

Description: Lemma for ang180 27169. Show that the "revolution number" 𝑁 is an integer, using efeq1 26883 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 26812	. . . . . . 7 ⊢ π ∈ ℂ
2		2re 12441	. . . . . . . . . 10 ⊢ 2 ∈ ℝ
3		pire 26810	. . . . . . . . . 10 ⊢ π ∈ ℝ
4	2, 3	remulcli 11349	. . . . . . . . 9 ⊢ (2 · π) ∈ ℝ
5	4	recni 11347	. . . . . . . 8 ⊢ (2 · π) ∈ ℂ
6		2pos 12471	. . . . . . . . . 10 ⊢ 0 < 2
7		pipos 26814	. . . . . . . . . 10 ⊢ 0 < π
8	2, 3, 6, 7	mulgt0ii 11467	. . . . . . . . 9 ⊢ 0 < (2 · π)
9	4, 8	gt0ne0ii 11876	. . . . . . . 8 ⊢ (2 · π) ≠ 0
10	5, 9	pm3.2i 476	. . . . . . 7 ⊢ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)
11		ax-icn 11283	. . . . . . . 8 ⊢ i ∈ ℂ
12		ine0 11775	. . . . . . . 8 ⊢ i ≠ 0
13	11, 12	pm3.2i 476	. . . . . . 7 ⊢ (i ∈ ℂ ∧ i ≠ 0)
14		divcan5 12043	. . . . . . 7 ⊢ ((π ∈ ℂ ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (i ∈ ℂ ∧ i ≠ 0)) → ((i · π) / (i · (2 · π))) = (π / (2 · π)))
15	1, 10, 13, 14	mp3an 1491	. . . . . 6 ⊢ ((i · π) / (i · (2 · π))) = (π / (2 · π))
16	3, 7	gt0ne0ii 11876	. . . . . . 7 ⊢ π ≠ 0
17		recdiv 12047	. . . . . . 7 ⊢ ((((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → (1 / ((2 · π) / π)) = (π / (2 · π)))
18	5, 9, 1, 16, 17	mp4an 706	. . . . . 6 ⊢ (1 / ((2 · π) / π)) = (π / (2 · π))
19	2	recni 11347	. . . . . . . 8 ⊢ 2 ∈ ℂ
20	19, 1, 16	divcan4i 12088	. . . . . . 7 ⊢ ((2 · π) / π) = 2
21	20	oveq2i 7451	. . . . . 6 ⊢ (1 / ((2 · π) / π)) = (1 / 2)
22	15, 18, 21	3eqtr2i 2792	. . . . 5 ⊢ ((i · π) / (i · (2 · π))) = (1 / 2)
23	22	oveq2i 7451	. . . 4 ⊢ ((𝑇 / (i · (2 · π))) − ((i · π) / (i · (2 · π)))) = ((𝑇 / (i · (2 · π))) − (1 / 2))
24		ang180lem1.2	. . . . . 6 ⊢ 𝑇 = (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))
25		ax-1cn 11282	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
26		simp1 1154	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ∈ ℂ)
27		subcl 11580	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (1 − 𝐴) ∈ ℂ)
28	25, 26, 27	sylancr 599	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ∈ ℂ)
29		simp3 1156	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝐴 ≠ 1)
30	29	necomd 3014	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ≠ 𝐴)
31		subeq0 11608	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
32	25, 26, 31	sylancr 599	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) = 0 ↔ 1 = 𝐴))
33	32	necon3bid 3003	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 − 𝐴) ≠ 0 ↔ 1 ≠ 𝐴))
34	30, 33	mpbird 260	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 − 𝐴) ≠ 0)
35	28, 34	reccld 12110	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ∈ ℂ)
36	28, 34	recne0d 12111	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) ≠ 0)
37	35, 36	logcld 26925	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘(1 / (1 − 𝐴))) ∈ ℂ)
38		subcl 11580	. . . . . . . . . . 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 12117	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ∈ ℂ)
42		subeq0 11608	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
43	26, 25, 42	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) = 0 ↔ 𝐴 = 1))
44	43	necon3bid 3003	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) ≠ 0 ↔ 𝐴 ≠ 1))
45	29, 44	mpbird 260	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝐴 − 1) ≠ 0)
46	39, 26, 45, 40	divne0d 12133	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝐴 − 1) / 𝐴) ≠ 0)
47	41, 46	logcld 26925	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘((𝐴 − 1) / 𝐴)) ∈ ℂ)
48	37, 47	addcld 11352	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) ∈ ℂ)
49	26, 40	logcld 26925	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (log‘𝐴) ∈ ℂ)
50	48, 49	addcld 11352	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)) ∈ ℂ)
51	24, 50	eqeltrid 2868	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑇 ∈ ℂ)
52	11, 1	mulcli 11340	. . . . . 6 ⊢ (i · π) ∈ ℂ
53	52	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · π) ∈ ℂ)
54	11, 5	mulcli 11340	. . . . . 6 ⊢ (i · (2 · π)) ∈ ℂ
55	54	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ∈ ℂ)
56	11, 5, 12, 9	mulne0i 11983	. . . . . 6 ⊢ (i · (2 · π)) ≠ 0
57	56	a1i 11	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (i · (2 · π)) ≠ 0)
58	51, 53, 55, 57	divsubdird 12156	. . . 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 12052	. . . . . . 7 ⊢ ((𝑇 ∈ ℂ ∧ (i ∈ ℂ ∧ i ≠ 0) ∧ ((2 · π) ∈ ℂ ∧ (2 · π) ≠ 0)) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
63	51, 60, 61, 62	syl3anc 1399	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) = (𝑇 / (i · (2 · π))))
64	63	oveq1d 7455	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) − (1 / 2)) = ((𝑇 / (i · (2 · π))) − (1 / 2)))
65	59, 64	eqtrid 2810	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 = ((𝑇 / (i · (2 · π))) − (1 / 2)))
66	23, 58, 65	3eqtr4a 2824	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 − (i · π)) / (i · (2 · π))) = 𝑁)
67		efsub 16294	. . . . . 6 ⊢ ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
68	51, 52, 67	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = ((exp‘𝑇) / (exp‘(i · π))))
69		efipi 26829	. . . . . . 7 ⊢ (exp‘(i · π)) = -1
70	69	oveq2i 7451	. . . . . 6 ⊢ ((exp‘𝑇) / (exp‘(i · π))) = ((exp‘𝑇) / -1)
71	24	fveq2i 6908	. . . . . . . . 9 ⊢ (exp‘𝑇) = (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴)))
72		efadd 16286	. . . . . . . . . . 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 16286	. . . . . . . . . . . . 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 26931	. . . . . . . . . . . . . 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 26931	. . . . . . . . . . . . . 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 7458	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘(log‘(1 / (1 − 𝐴)))) · (exp‘(log‘((𝐴 − 1) / 𝐴)))) = ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)))
81	35, 41	mulcomd 11354	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))))
82	25	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 1 ∈ ℂ)
83	82, 28, 34	div2negd 12132	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ( -1 / -(1 − 𝐴)) = (1 / (1 − 𝐴)))
84		negsubdi2 11641	. . . . . . . . . . . . . . . . 17 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → -(1 − 𝐴) = (𝐴 − 1))
85	25, 26, 84	sylancr 599	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -(1 − 𝐴) = (𝐴 − 1))
86	85	oveq2d 7456	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ( -1 / -(1 − 𝐴)) = ( -1 / (𝐴 − 1)))
87	83, 86	eqtr3d 2800	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (1 / (1 − 𝐴)) = ( -1 / (𝐴 − 1)))
88	87	oveq2d 7456	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · (1 / (1 − 𝐴))) = (((𝐴 − 1) / 𝐴) · ( -1 / (𝐴 − 1))))
89		neg1cn 12329	. . . . . . . . . . . . . . 15 ⊢ -1 ∈ ℂ
90	89	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → -1 ∈ ℂ)
91	90, 39, 26, 45, 40	dmdcand 12146	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝐴 − 1) / 𝐴) · ( -1 / (𝐴 − 1))) = ( -1 / 𝐴))
92	81, 88, 91	3eqtrd 2802	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((1 / (1 − 𝐴)) · ((𝐴 − 1) / 𝐴)) = ( -1 / 𝐴))
93	75, 80, 92	3eqtrd 2802	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) = ( -1 / 𝐴))
94		eflog 26931	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(log‘𝐴)) = 𝐴)
95	26, 40, 94	syl2anc 596	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(log‘𝐴)) = 𝐴)
96	93, 95	oveq12d 7458	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴)))) · (exp‘(log‘𝐴))) = (( -1 / 𝐴) · 𝐴))
97	90, 26, 40	divcan1d 12118	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (( -1 / 𝐴) · 𝐴) = -1)
98	73, 96, 97	3eqtrd 2802	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(((log‘(1 / (1 − 𝐴))) + (log‘((𝐴 − 1) / 𝐴))) + (log‘𝐴))) = -1)
99	71, 98	eqtrid 2810	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘𝑇) = -1)
100	99	oveq1d 7455	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = ( -1 / -1))
101		neg1ne0 12331	. . . . . . . 8 ⊢ -1 ≠ 0
102	89, 101	dividi 12074	. . . . . . 7 ⊢ ( -1 / -1) = 1
103	100, 102	eqtrdi 2814	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / -1) = 1)
104	70, 103	eqtrid 2810	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((exp‘𝑇) / (exp‘(i · π))) = 1)
105	68, 104	eqtrd 2798	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (exp‘(𝑇 − (i · π))) = 1)
106		subcl 11580	. . . . . 6 ⊢ ((𝑇 ∈ ℂ ∧ (i · π) ∈ ℂ) → (𝑇 − (i · π)) ∈ ℂ)
107	51, 52, 106	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑇 − (i · π)) ∈ ℂ)
108		efeq1 26883	. . . . 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 2865	. 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 12117	. . . 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 12118	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) = (𝑇 / i))
118	59	oveq1i 7450	. . . . . 6 ⊢ (𝑁 + (1 / 2)) = ((((𝑇 / i) / (2 · π)) − (1 / 2)) + (1 / 2))
119	114, 115, 116	divcld 12117	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℂ)
120		halfre 12583	. . . . . . . 8 ⊢ (1 / 2) ∈ ℝ
121	120	recni 11347	. . . . . . 7 ⊢ (1 / 2) ∈ ℂ
122		npcan 11590	. . . . . . 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 2810	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) = ((𝑇 / i) / (2 · π)))
125	111	zred 12827	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → 𝑁 ∈ ℝ)
126		readdcl 11307	. . . . . 6 ⊢ ((𝑁 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (𝑁 + (1 / 2)) ∈ ℝ)
127	125, 120, 126	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (𝑁 + (1 / 2)) ∈ ℝ)
128	124, 127	eqeltrrd 2865	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → ((𝑇 / i) / (2 · π)) ∈ ℝ)
129		remulcl 11309	. . . 4 ⊢ ((((𝑇 / i) / (2 · π)) ∈ ℝ ∧ (2 · π) ∈ ℝ) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
130	128, 4, 129	sylancl 598	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝐴 ≠ 1) → (((𝑇 / i) / (2 · π)) · (2 · π)) ∈ ℝ)
131	117, 130	eqeltrrd 2865	. 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 1570   ∈ wcel 2147   ≠ wne 2959   ∖ cdif 4048  {csn 4588  ‘cfv 6555  (class class class)co 7440   ∈ cmpo 7442  ℂcc 11222  ℝcr 11223  0cc0 11224  1c1 11225  ici 11226   + caddc 11227   · cmul 11229   − cmin 11565   -cneg 11566   / cdiv 11997  2c2 12421  ℤcz 12717  ℑcim 15291  expce 16253  πcpi 16258  logclog 26909

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7772  ax-inf2 9666  ax-cnex 11280  ax-resscn 11281  ax-1cn 11282  ax-icn 11283  ax-addcl 11284  ax-addrcl 11285  ax-mulcl 11286  ax-mulrcl 11287  ax-mulcom 11288  ax-addass 11289  ax-mulass 11290  ax-distr 11291  ax-i2m1 11292  ax-1ne0 11293  ax-1rid 11294  ax-rnegex 11295  ax-rrecex 11296  ax-cnre 11297  ax-pre-lttri 11298  ax-pre-lttrn 11299  ax-pre-ltadd 11300  ax-pre-mulgt0 11301  ax-pre-sup 11302  ax-addf 11303

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6319  df-ord 6380  df-on 6381  df-lim 6382  df-suc 6383  df-iota 6509  df-fun 6557  df-fn 6558  df-f 6559  df-f1 6560  df-fo 6561  df-f1o 6562  df-fv 6563  df-isom 6564  df-riota 7397  df-ov 7443  df-oprab 7444  df-mpo 7445  df-of 7714  df-om 7899  df-1st 8022  df-2nd 8023  df-supp 8202  df-frecs 8324  df-wrecs 8355  df-recs 8404  df-rdg 8443  df-1o 8501  df-2o 8502  df-er 8742  df-map 8874  df-pm 8875  df-ixp 8951  df-en 8999  df-dom 9000  df-sdom 9001  df-fin 9002  df-fsupp 9379  df-fi 9427  df-sup 9458  df-inf 9459  df-oi 9528  df-card 10044  df-pnf 11369  df-mnf 11370  df-xr 11371  df-ltxr 11372  df-le 11373  df-sub 11567  df-neg 11568  df-div 11998  df-nn 12360  df-2 12429  df-3 12430  df-4 12431  df-5 12432  df-6 12433  df-7 12434  df-8 12435  df-9 12436  df-n0 12631  df-z 12718  df-dec 12839  df-uz 12990  df-q 13100  df-rp 13145  df-xneg 13265  df-xadd 13266  df-xmul 13267  df-ioo 13504  df-ioc 13505  df-ico 13506  df-icc 13507  df-fz 13664  df-fzo 13813  df-fl 13956  df-mod 14034  df-seq 14169  df-exp 14229  df-fac 14442  df-bc 14471  df-hash 14499  df-shft 15246  df-cj 15292  df-re 15293  df-im 15294  df-sqrt 15428  df-abs 15429  df-limsup 15664  df-clim 15681  df-rlim 15682  df-sum 15880  df-ef 16259  df-sin 16261  df-cos 16262  df-pi 16264  df-struct 17351  df-sets 17368  df-slot 17386  df-ndx 17398  df-base 17414  df-ress 17435  df-plusg 17467  df-mulr 17468  df-starv 17469  df-sca 17470  df-vsca 17471  df-ip 17472  df-tset 17473  df-ple 17474  df-ds 17476  df-unif 17477  df-hom 17478  df-cco 17479  df-rest 17619  df-topn 17620  df-0g 17638  df-gsum 17639  df-topgen 17640  df-pt 17641  df-prds 17644  df-xrs 17700  df-qtop 17705  df-imas 17706  df-xps 17708  df-mre 17782  df-mrc 17783  df-acs 17785  df-mgm 18842  df-sgrp 18934  df-mnd 18950  df-submnd 19005  df-mulg 19304  df-cntz 19558  df-cmn 20023  df-psmet 21697  df-xmet 21698  df-met 21699  df-bl 21700  df-mopn 21701  df-fbas 21702  df-fg 21703  df-cnfld 21706  df-top 23239  df-topon 23256  df-topsp 23278  df-bases 23291  df-cld 23364  df-ntr 23365  df-cls 23366  df-nei 23443  df-lp 23481  df-perf 23482  df-cn 23572  df-cnp 23573  df-haus 23660  df-tx 23908  df-hmeo 24101  df-fil 24192  df-fm 24284  df-flim 24285  df-flf 24286  df-xms 24666  df-ms 24667  df-tms 24668  df-cncf 25226  df-limc 26213  df-dv 26214  df-log 26911

This theorem is used by:  ang180lem2  27165  ang180lem3  27166