atans2 - Metamath Proof Explorer

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

Theorem atans2 26992

Description: It suffices to show that 1 − i𝐴 and 1 + i𝐴 are in the continuity domain of log to show that 𝐴 is in the continuity domain of arctangent. (Contributed by Mario Carneiro, 7-Apr-2015.)

**Hypotheses**
Ref	Expression
atansopn.d	⊢ 𝐷 = (ℂ ∖ (-∞(,]0))
atansopn.s	⊢ 𝑆 = {𝑦 ∈ ℂ ∣ (1 + (𝑦↑2)) ∈ 𝐷}

**Assertion**
Ref	Expression
atans2	⊢ (𝐴 ∈ 𝑆 ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷))

Distinct variable groups: 𝑦,𝐴 𝑦,𝐷 Allowed substitution hint: 𝑆(𝑦)

**Proof of Theorem atans2**
Step	Hyp	Ref	Expression
1		sqcl 14168	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
2	1	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) ∈ ℂ)
3	2	sqsqrtd 15488	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((√‘(𝐴↑2))↑2) = (𝐴↑2))
4	3	eqcomd 2746	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) = ((√‘(𝐴↑2))↑2))
5	2	sqrtcld 15486	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘(𝐴↑2)) ∈ ℂ)
6		sqeqor 14265	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → ((𝐴↑2) = ((√‘(𝐴↑2))↑2) ↔ (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2)))))
7	5, 6	syldan 590	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((𝐴↑2) = ((√‘(𝐴↑2))↑2) ↔ (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2)))))
8	4, 7	mpbid 232	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2))))
9		1re 11290	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℝ
10	9	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 1 ∈ ℝ)
11	2	negnegd 11638	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → --(𝐴↑2) = (𝐴↑2))
12	11	fveq2d 6924	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘--(𝐴↑2)) = (√‘(𝐴↑2)))
13		ax-1cn 11242	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 1 ∈ ℂ
14		pncan2 11543	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((1 + (𝐴↑2)) − 1) = (𝐴↑2))
15	13, 2, 14	sylancr 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (𝐴↑2)) − 1) = (𝐴↑2))
16		simpr 484	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (𝐴↑2)) ∈ (-∞(,]0))
17		mnfxr 11347	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ -∞ ∈ ℝ^*
18		0re 11292	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ 0 ∈ ℝ
19		elioc2 13470	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ ((1 + (𝐴↑2)) ∈ ℝ ∧ -∞ < (1 + (𝐴↑2)) ∧ (1 + (𝐴↑2)) ≤ 0)))
20	17, 18, 19	mp2an 691	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ ((1 + (𝐴↑2)) ∈ ℝ ∧ -∞ < (1 + (𝐴↑2)) ∧ (1 + (𝐴↑2)) ≤ 0))
21	16, 20	sylib 218	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (𝐴↑2)) ∈ ℝ ∧ -∞ < (1 + (𝐴↑2)) ∧ (1 + (𝐴↑2)) ≤ 0))
22	21	simp1d 1142	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (𝐴↑2)) ∈ ℝ)
23		resubcl 11600	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((1 + (𝐴↑2)) ∈ ℝ ∧ 1 ∈ ℝ) → ((1 + (𝐴↑2)) − 1) ∈ ℝ)
24	22, 9, 23	sylancl 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (𝐴↑2)) − 1) ∈ ℝ)
25	15, 24	eqeltrrd 2845	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) ∈ ℝ)
26	25	renegcld 11717	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(𝐴↑2) ∈ ℝ)
27		0red 11293	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ∈ ℝ)
28		0le1 11813	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 ≤ 1
29	28	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ 1)
30		subneg 11585	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
31	13, 2, 30	sylancr 586	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
32	21	simp3d 1144	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (𝐴↑2)) ≤ 0)
33	31, 32	eqbrtrd 5188	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(𝐴↑2)) ≤ 0)
34		suble0 11804	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℝ ∧ -(𝐴↑2) ∈ ℝ) → ((1 − -(𝐴↑2)) ≤ 0 ↔ 1 ≤ -(𝐴↑2)))
35	9, 26, 34	sylancr 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 − -(𝐴↑2)) ≤ 0 ↔ 1 ≤ -(𝐴↑2)))
36	33, 35	mpbid 232	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 1 ≤ -(𝐴↑2))
37	27, 10, 26, 29, 36	letrd 11447	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ -(𝐴↑2))
38	26, 37	sqrtnegd 15470	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘--(𝐴↑2)) = (i · (√‘-(𝐴↑2))))
39	12, 38	eqtr3d 2782	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘(𝐴↑2)) = (i · (√‘-(𝐴↑2))))
40	39	oveq2d 7464	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) = (i · (i · (√‘-(𝐴↑2)))))
41		ax-icn 11243	. . . . . . . . . . . . . . . . 17 ⊢ i ∈ ℂ
42	41	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → i ∈ ℂ)
43	26, 37	resqrtcld 15466	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘-(𝐴↑2)) ∈ ℝ)
44	43	recnd 11318	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘-(𝐴↑2)) ∈ ℂ)
45	42, 42, 44	mulassd 11313	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((i · i) · (√‘-(𝐴↑2))) = (i · (i · (√‘-(𝐴↑2)))))
46		ixi 11919	. . . . . . . . . . . . . . . . 17 ⊢ (i · i) = -1
47	46	oveq1i 7458	. . . . . . . . . . . . . . . 16 ⊢ ((i · i) · (√‘-(𝐴↑2))) = (-1 · (√‘-(𝐴↑2)))
48	44	mulm1d 11742	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (-1 · (√‘-(𝐴↑2))) = -(√‘-(𝐴↑2)))
49	47, 48	eqtrid 2792	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((i · i) · (√‘-(𝐴↑2))) = -(√‘-(𝐴↑2)))
50	40, 45, 49	3eqtr2d 2786	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) = -(√‘-(𝐴↑2)))
51	43	renegcld 11717	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(√‘-(𝐴↑2)) ∈ ℝ)
52	50, 51	eqeltrd 2844	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) ∈ ℝ)
53	10, 52	readdcld 11319	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ∈ ℝ)
54	53	mnfltd 13187	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -∞ < (1 + (i · (√‘(𝐴↑2)))))
55	50	oveq2d 7464	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) = (1 + -(√‘-(𝐴↑2))))
56		negsub 11584	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ (√‘-(𝐴↑2)) ∈ ℂ) → (1 + -(√‘-(𝐴↑2))) = (1 − (√‘-(𝐴↑2))))
57	13, 44, 56	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + -(√‘-(𝐴↑2))) = (1 − (√‘-(𝐴↑2))))
58	55, 57	eqtrd 2780	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) = (1 − (√‘-(𝐴↑2))))
59		sq1 14244	. . . . . . . . . . . . . . . . 17 ⊢ (1↑2) = 1
60	59	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1↑2) = 1)
61	26	recnd 11318	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(𝐴↑2) ∈ ℂ)
62	61	sqsqrtd 15488	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((√‘-(𝐴↑2))↑2) = -(𝐴↑2))
63	36, 60, 62	3brtr4d 5198	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1↑2) ≤ ((√‘-(𝐴↑2))↑2))
64	26, 37	sqrtge0d 15469	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ (√‘-(𝐴↑2)))
65	10, 43, 29, 64	le2sqd 14306	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 ≤ (√‘-(𝐴↑2)) ↔ (1↑2) ≤ ((√‘-(𝐴↑2))↑2)))
66	63, 65	mpbird 257	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 1 ≤ (√‘-(𝐴↑2)))
67	10, 43	suble0d 11881	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 − (√‘-(𝐴↑2))) ≤ 0 ↔ 1 ≤ (√‘-(𝐴↑2))))
68	66, 67	mpbird 257	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (√‘-(𝐴↑2))) ≤ 0)
69	58, 68	eqbrtrd 5188	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ≤ 0)
70		elioc2 13470	. . . . . . . . . . . . 13 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0) ↔ ((1 + (i · (√‘(𝐴↑2)))) ∈ ℝ ∧ -∞ < (1 + (i · (√‘(𝐴↑2)))) ∧ (1 + (i · (√‘(𝐴↑2)))) ≤ 0)))
71	17, 18, 70	mp2an 691	. . . . . . . . . . . 12 ⊢ ((1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0) ↔ ((1 + (i · (√‘(𝐴↑2)))) ∈ ℝ ∧ -∞ < (1 + (i · (√‘(𝐴↑2)))) ∧ (1 + (i · (√‘(𝐴↑2)))) ≤ 0))
72	53, 54, 69, 71	syl3anbrc 1343	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0))
73		oveq2 7456	. . . . . . . . . . . . 13 ⊢ (𝐴 = (√‘(𝐴↑2)) → (i · 𝐴) = (i · (√‘(𝐴↑2))))
74	73	oveq2d 7464	. . . . . . . . . . . 12 ⊢ (𝐴 = (√‘(𝐴↑2)) → (1 + (i · 𝐴)) = (1 + (i · (√‘(𝐴↑2)))))
75	74	eleq1d 2829	. . . . . . . . . . 11 ⊢ (𝐴 = (√‘(𝐴↑2)) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ↔ (1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0)))
76	72, 75	syl5ibrcom 247	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴 = (√‘(𝐴↑2)) → (1 + (i · 𝐴)) ∈ (-∞(,]0)))
77		mulneg2 11727	. . . . . . . . . . . . . . 15 ⊢ ((i ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → (i · -(√‘(𝐴↑2))) = -(i · (√‘(𝐴↑2))))
78	41, 5, 77	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · -(√‘(𝐴↑2))) = -(i · (√‘(𝐴↑2))))
79	78	oveq2d 7464	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) = (1 − -(i · (√‘(𝐴↑2)))))
80		mulcl 11268	. . . . . . . . . . . . . . 15 ⊢ ((i ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → (i · (√‘(𝐴↑2))) ∈ ℂ)
81	41, 5, 80	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) ∈ ℂ)
82		subneg 11585	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ (i · (√‘(𝐴↑2))) ∈ ℂ) → (1 − -(i · (√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
83	13, 81, 82	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(i · (√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
84	79, 83	eqtrd 2780	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
85	84, 72	eqeltrd 2844	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) ∈ (-∞(,]0))
86		oveq2 7456	. . . . . . . . . . . . 13 ⊢ (𝐴 = -(√‘(𝐴↑2)) → (i · 𝐴) = (i · -(√‘(𝐴↑2))))
87	86	oveq2d 7464	. . . . . . . . . . . 12 ⊢ (𝐴 = -(√‘(𝐴↑2)) → (1 − (i · 𝐴)) = (1 − (i · -(√‘(𝐴↑2)))))
88	87	eleq1d 2829	. . . . . . . . . . 11 ⊢ (𝐴 = -(√‘(𝐴↑2)) → ((1 − (i · 𝐴)) ∈ (-∞(,]0) ↔ (1 − (i · -(√‘(𝐴↑2)))) ∈ (-∞(,]0)))
89	85, 88	syl5ibrcom 247	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴 = -(√‘(𝐴↑2)) → (1 − (i · 𝐴)) ∈ (-∞(,]0)))
90	76, 89	orim12d 965	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2))) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 − (i · 𝐴)) ∈ (-∞(,]0))))
91	8, 90	mpd 15	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 − (i · 𝐴)) ∈ (-∞(,]0)))
92	91	orcomd 870	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
93	59	a1i 11	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → (1↑2) = 1)
94		sqmul 14169	. . . . . . . . . . . . 13 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
95	41, 94	mpan 689	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
96		i2 14251	. . . . . . . . . . . . . 14 ⊢ (i↑2) = -1
97	96	oveq1i 7458	. . . . . . . . . . . . 13 ⊢ ((i↑2) · (𝐴↑2)) = (-1 · (𝐴↑2))
98	1	mulm1d 11742	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (-1 · (𝐴↑2)) = -(𝐴↑2))
99	97, 98	eqtrid 2792	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((i↑2) · (𝐴↑2)) = -(𝐴↑2))
100	95, 99	eqtrd 2780	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = -(𝐴↑2))
101	93, 100	oveq12d 7466	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → ((1↑2) − ((i · 𝐴)↑2)) = (1 − -(𝐴↑2)))
102		mulcl 11268	. . . . . . . . . . . 12 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
103	41, 102	mpan 689	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → (i · 𝐴) ∈ ℂ)
104		subsq 14259	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → ((1↑2) − ((i · 𝐴)↑2)) = ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
105	13, 103, 104	sylancr 586	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → ((1↑2) − ((i · 𝐴)↑2)) = ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
106	13, 1, 30	sylancr 586	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
107	101, 105, 106	3eqtr3d 2788	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) = (1 + (𝐴↑2)))
108	107	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) = (1 + (𝐴↑2)))
109		2cn 12368	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℂ
110	109	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℂ → 2 ∈ ℂ)
111	13	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℂ → 1 ∈ ℂ)
112	110, 111, 103	subsubd 11675	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → (2 − (1 − (i · 𝐴))) = ((2 − 1) + (i · 𝐴)))
113		2m1e1 12419	. . . . . . . . . . . . . . 15 ⊢ (2 − 1) = 1
114	113	oveq1i 7458	. . . . . . . . . . . . . 14 ⊢ ((2 − 1) + (i · 𝐴)) = (1 + (i · 𝐴))
115	112, 114	eqtrdi 2796	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (2 − (1 − (i · 𝐴))) = (1 + (i · 𝐴)))
116	115	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 − (i · 𝐴))) = (1 + (i · 𝐴)))
117		2re 12367	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
118		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ (-∞(,]0))
119		elioc2 13470	. . . . . . . . . . . . . . . 16 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 − (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 − (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 − (i · 𝐴)) ∧ (1 − (i · 𝐴)) ≤ 0)))
120	17, 18, 119	mp2an 691	. . . . . . . . . . . . . . 15 ⊢ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 − (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 − (i · 𝐴)) ∧ (1 − (i · 𝐴)) ≤ 0))
121	118, 120	sylib 218	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 − (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 − (i · 𝐴)) ∧ (1 − (i · 𝐴)) ≤ 0))
122	121	simp1d 1142	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ ℝ)
123		resubcl 11600	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ ∧ (1 − (i · 𝐴)) ∈ ℝ) → (2 − (1 − (i · 𝐴))) ∈ ℝ)
124	117, 122, 123	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 − (i · 𝐴))) ∈ ℝ)
125	116, 124	eqeltrrd 2845	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ ℝ)
126	125, 122	remulcld 11320	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ)
127	126	mnfltd 13187	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
128	121	simp3d 1144	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ≤ 0)
129		0red 11293	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 ∈ ℝ)
130	117	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ∈ ℝ)
131		2pos 12396	. . . . . . . . . . . . . . 15 ⊢ 0 < 2
132	131	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 < 2)
133	109	subid1i 11608	. . . . . . . . . . . . . . . 16 ⊢ (2 − 0) = 2
134	122, 129, 130, 128	lesub2dd 11907	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − 0) ≤ (2 − (1 − (i · 𝐴))))
135	133, 134	eqbrtrrid 5202	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (2 − (1 − (i · 𝐴))))
136	135, 116	breqtrd 5192	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (1 + (i · 𝐴)))
137	129, 130, 125, 132, 136	ltletrd 11450	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 < (1 + (i · 𝐴)))
138		lemul2 12147	. . . . . . . . . . . . 13 ⊢ (((1 − (i · 𝐴)) ∈ ℝ ∧ 0 ∈ ℝ ∧ ((1 + (i · 𝐴)) ∈ ℝ ∧ 0 < (1 + (i · 𝐴)))) → ((1 − (i · 𝐴)) ≤ 0 ↔ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ ((1 + (i · 𝐴)) · 0)))
139	122, 129, 125, 137, 138	syl112anc 1374	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 − (i · 𝐴)) ≤ 0 ↔ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ ((1 + (i · 𝐴)) · 0)))
140	128, 139	mpbid 232	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ ((1 + (i · 𝐴)) · 0))
141		addcl 11266	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
142	13, 103, 141	sylancr 586	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (1 + (i · 𝐴)) ∈ ℂ)
143	142	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ ℂ)
144	143	mul01d 11489	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · 0) = 0)
145	140, 144	breqtrd 5192	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0)
146		elioc2 13470	. . . . . . . . . . 11 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → (((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0) ↔ (((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ ∧ -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∧ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0)))
147	17, 18, 146	mp2an 691	. . . . . . . . . 10 ⊢ (((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0) ↔ (((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ ∧ -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∧ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0))
148	126, 127, 145, 147	syl3anbrc 1343	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
149		simpr 484	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ (-∞(,]0))
150		elioc2 13470	. . . . . . . . . . . . . 14 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 + (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 + (i · 𝐴)) ∧ (1 + (i · 𝐴)) ≤ 0)))
151	17, 18, 150	mp2an 691	. . . . . . . . . . . . 13 ⊢ ((1 + (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 + (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 + (i · 𝐴)) ∧ (1 + (i · 𝐴)) ≤ 0))
152	149, 151	sylib 218	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 + (i · 𝐴)) ∧ (1 + (i · 𝐴)) ≤ 0))
153	152	simp1d 1142	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ ℝ)
154	110, 111, 103	subsub4d 11678	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → ((2 − 1) − (i · 𝐴)) = (2 − (1 + (i · 𝐴))))
155	113	oveq1i 7458	. . . . . . . . . . . . . 14 ⊢ ((2 − 1) − (i · 𝐴)) = (1 − (i · 𝐴))
156	154, 155	eqtr3di 2795	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (2 − (1 + (i · 𝐴))) = (1 − (i · 𝐴)))
157	156	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 + (i · 𝐴))) = (1 − (i · 𝐴)))
158		resubcl 11600	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ ∧ (1 + (i · 𝐴)) ∈ ℝ) → (2 − (1 + (i · 𝐴))) ∈ ℝ)
159	117, 153, 158	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 + (i · 𝐴))) ∈ ℝ)
160	157, 159	eqeltrrd 2845	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ ℝ)
161	153, 160	remulcld 11320	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ)
162	161	mnfltd 13187	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
163	152	simp3d 1144	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ≤ 0)
164		0red 11293	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 0 ∈ ℝ)
165	117	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 2 ∈ ℝ)
166	131	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 0 < 2)
167	153, 164, 165, 163	lesub2dd 11907	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − 0) ≤ (2 − (1 + (i · 𝐴))))
168	133, 167	eqbrtrrid 5202	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (2 − (1 + (i · 𝐴))))
169	168, 157	breqtrd 5192	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (1 − (i · 𝐴)))
170	164, 165, 160, 166, 169	ltletrd 11450	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 0 < (1 − (i · 𝐴)))
171		lemul1 12146	. . . . . . . . . . . . 13 ⊢ (((1 + (i · 𝐴)) ∈ ℝ ∧ 0 ∈ ℝ ∧ ((1 − (i · 𝐴)) ∈ ℝ ∧ 0 < (1 − (i · 𝐴)))) → ((1 + (i · 𝐴)) ≤ 0 ↔ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ (0 · (1 − (i · 𝐴)))))
172	153, 164, 160, 170, 171	syl112anc 1374	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) ≤ 0 ↔ ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ (0 · (1 − (i · 𝐴)))))
173	163, 172	mpbid 232	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ (0 · (1 − (i · 𝐴))))
174	160	recnd 11318	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ ℂ)
175	174	mul02d 11488	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (0 · (1 − (i · 𝐴))) = 0)
176	173, 175	breqtrd 5192	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0)
177	161, 162, 176, 147	syl3anbrc 1343	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
178	148, 177	jaodan 958	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
179	108, 178	eqeltrrd 2845	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))) → (1 + (𝐴↑2)) ∈ (-∞(,]0))
180	92, 179	impbida 800	. . . . . 6 ⊢ (𝐴 ∈ ℂ → ((1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))))
181	180	notbid 318	. . . . 5 ⊢ (𝐴 ∈ ℂ → (¬ (1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ ¬ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))))
182		ioran 984	. . . . 5 ⊢ (¬ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0)) ↔ (¬ (1 − (i · 𝐴)) ∈ (-∞(,]0) ∧ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
183	181, 182	bitrdi 287	. . . 4 ⊢ (𝐴 ∈ ℂ → (¬ (1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ (¬ (1 − (i · 𝐴)) ∈ (-∞(,]0) ∧ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0))))
184		addcl 11266	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → (1 + (𝐴↑2)) ∈ ℂ)
185	13, 1, 184	sylancr 586	. . . . 5 ⊢ (𝐴 ∈ ℂ → (1 + (𝐴↑2)) ∈ ℂ)
186		atansopn.d	. . . . . . . 8 ⊢ 𝐷 = (ℂ ∖ (-∞(,]0))
187	186	eleq2i 2836	. . . . . . 7 ⊢ ((1 + (𝐴↑2)) ∈ 𝐷 ↔ (1 + (𝐴↑2)) ∈ (ℂ ∖ (-∞(,]0)))
188		eldif 3986	. . . . . . 7 ⊢ ((1 + (𝐴↑2)) ∈ (ℂ ∖ (-∞(,]0)) ↔ ((1 + (𝐴↑2)) ∈ ℂ ∧ ¬ (1 + (𝐴↑2)) ∈ (-∞(,]0)))
189	187, 188	bitri 275	. . . . . 6 ⊢ ((1 + (𝐴↑2)) ∈ 𝐷 ↔ ((1 + (𝐴↑2)) ∈ ℂ ∧ ¬ (1 + (𝐴↑2)) ∈ (-∞(,]0)))
190	189	baib 535	. . . . 5 ⊢ ((1 + (𝐴↑2)) ∈ ℂ → ((1 + (𝐴↑2)) ∈ 𝐷 ↔ ¬ (1 + (𝐴↑2)) ∈ (-∞(,]0)))
191	185, 190	syl 17	. . . 4 ⊢ (𝐴 ∈ ℂ → ((1 + (𝐴↑2)) ∈ 𝐷 ↔ ¬ (1 + (𝐴↑2)) ∈ (-∞(,]0)))
192		subcl 11535	. . . . . . 7 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
193	13, 103, 192	sylancr 586	. . . . . 6 ⊢ (𝐴 ∈ ℂ → (1 − (i · 𝐴)) ∈ ℂ)
194	186	eleq2i 2836	. . . . . . . 8 ⊢ ((1 − (i · 𝐴)) ∈ 𝐷 ↔ (1 − (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)))
195		eldif 3986	. . . . . . . 8 ⊢ ((1 − (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)) ↔ ((1 − (i · 𝐴)) ∈ ℂ ∧ ¬ (1 − (i · 𝐴)) ∈ (-∞(,]0)))
196	194, 195	bitri 275	. . . . . . 7 ⊢ ((1 − (i · 𝐴)) ∈ 𝐷 ↔ ((1 − (i · 𝐴)) ∈ ℂ ∧ ¬ (1 − (i · 𝐴)) ∈ (-∞(,]0)))
197	196	baib 535	. . . . . 6 ⊢ ((1 − (i · 𝐴)) ∈ ℂ → ((1 − (i · 𝐴)) ∈ 𝐷 ↔ ¬ (1 − (i · 𝐴)) ∈ (-∞(,]0)))
198	193, 197	syl 17	. . . . 5 ⊢ (𝐴 ∈ ℂ → ((1 − (i · 𝐴)) ∈ 𝐷 ↔ ¬ (1 − (i · 𝐴)) ∈ (-∞(,]0)))
199	186	eleq2i 2836	. . . . . . . 8 ⊢ ((1 + (i · 𝐴)) ∈ 𝐷 ↔ (1 + (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)))
200		eldif 3986	. . . . . . . 8 ⊢ ((1 + (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)) ↔ ((1 + (i · 𝐴)) ∈ ℂ ∧ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
201	199, 200	bitri 275	. . . . . . 7 ⊢ ((1 + (i · 𝐴)) ∈ 𝐷 ↔ ((1 + (i · 𝐴)) ∈ ℂ ∧ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
202	201	baib 535	. . . . . 6 ⊢ ((1 + (i · 𝐴)) ∈ ℂ → ((1 + (i · 𝐴)) ∈ 𝐷 ↔ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
203	142, 202	syl 17	. . . . 5 ⊢ (𝐴 ∈ ℂ → ((1 + (i · 𝐴)) ∈ 𝐷 ↔ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
204	198, 203	anbi12d 631	. . . 4 ⊢ (𝐴 ∈ ℂ → (((1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷) ↔ (¬ (1 − (i · 𝐴)) ∈ (-∞(,]0) ∧ ¬ (1 + (i · 𝐴)) ∈ (-∞(,]0))))
205	183, 191, 204	3bitr4d 311	. . 3 ⊢ (𝐴 ∈ ℂ → ((1 + (𝐴↑2)) ∈ 𝐷 ↔ ((1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷)))
206	205	pm5.32i 574	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ 𝐷) ↔ (𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷)))
207		atansopn.s	. . 3 ⊢ 𝑆 = {𝑦 ∈ ℂ ∣ (1 + (𝑦↑2)) ∈ 𝐷}
208	186, 207	atans 26991	. 2 ⊢ (𝐴 ∈ 𝑆 ↔ (𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ 𝐷))
209		3anass 1095	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷) ↔ (𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷)))
210	206, 208, 209	3bitr4i 303	1 ⊢ (𝐴 ∈ 𝑆 ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ 𝐷 ∧ (1 + (i · 𝐴)) ∈ 𝐷))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 ↔ wb 206 ∧ wa 395 ∨ wo 846 ∧ w3a 1087 = wceq 1537 ∈ wcel 2108 {crab 3443 ∖ cdif 3973 class class class wbr 5166 ‘cfv 6573 (class class class)co 7448 ℂcc 11182 ℝcr 11183 0cc0 11184 1c1 11185 ici 11186 + caddc 11187 · cmul 11189 -∞cmnf 11322 ℝ^*cxr 11323 < clt 11324 ≤ cle 11325 − cmin 11520 -cneg 11521 2c2 12348 (,]cioc 13408 ↑cexp 14112 √csqrt 15282

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1793 ax-4 1807 ax-5 1909 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2158 ax-12 2178 ax-ext 2711 ax-sep 5317 ax-nul 5324 ax-pow 5383 ax-pr 5447 ax-un 7770 ax-cnex 11240 ax-resscn 11241 ax-1cn 11242 ax-icn 11243 ax-addcl 11244 ax-addrcl 11245 ax-mulcl 11246 ax-mulrcl 11247 ax-mulcom 11248 ax-addass 11249 ax-mulass 11250 ax-distr 11251 ax-i2m1 11252 ax-1ne0 11253 ax-1rid 11254 ax-rnegex 11255 ax-rrecex 11256 ax-cnre 11257 ax-pre-lttri 11258 ax-pre-lttrn 11259 ax-pre-ltadd 11260 ax-pre-mulgt0 11261 ax-pre-sup 11262

This theorem depends on definitions: df-bi 207 df-an 396 df-or 847 df-3or 1088 df-3an 1089 df-tru 1540 df-fal 1550 df-ex 1778 df-nf 1782 df-sb 2065 df-mo 2543 df-eu 2572 df-clab 2718 df-cleq 2732 df-clel 2819 df-nfc 2895 df-ne 2947 df-nel 3053 df-ral 3068 df-rex 3077 df-rmo 3388 df-reu 3389 df-rab 3444 df-v 3490 df-sbc 3805 df-csb 3922 df-dif 3979 df-un 3981 df-in 3983 df-ss 3993 df-pss 3996 df-nul 4353 df-if 4549 df-pw 4624 df-sn 4649 df-pr 4651 df-op 4655 df-uni 4932 df-iun 5017 df-br 5167 df-opab 5229 df-mpt 5250 df-tr 5284 df-id 5593 df-eprel 5599 df-po 5607 df-so 5608 df-fr 5652 df-we 5654 df-xp 5706 df-rel 5707 df-cnv 5708 df-co 5709 df-dm 5710 df-rn 5711 df-res 5712 df-ima 5713 df-pred 6332 df-ord 6398 df-on 6399 df-lim 6400 df-suc 6401 df-iota 6525 df-fun 6575 df-fn 6576 df-f 6577 df-f1 6578 df-fo 6579 df-f1o 6580 df-fv 6581 df-riota 7404 df-ov 7451 df-oprab 7452 df-mpo 7453 df-om 7904 df-2nd 8031 df-frecs 8322 df-wrecs 8353 df-recs 8427 df-rdg 8466 df-er 8763 df-en 9004 df-dom 9005 df-sdom 9006 df-sup 9511 df-pnf 11326 df-mnf 11327 df-xr 11328 df-ltxr 11329 df-le 11330 df-sub 11522 df-neg 11523 df-div 11948 df-nn 12294 df-2 12356 df-3 12357 df-n0 12554 df-z 12640 df-uz 12904 df-rp 13058 df-ioc 13412 df-seq 14053 df-exp 14113 df-cj 15148 df-re 15149 df-im 15150 df-sqrt 15284 df-abs 15285

This theorem is referenced by: dvatan 26996

W3C validator