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 26841

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 14083	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
2	1	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) ∈ ℂ)
3	2	sqsqrtd 15408	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((√‘(𝐴↑2))↑2) = (𝐴↑2))
4	3	eqcomd 2735	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) = ((√‘(𝐴↑2))↑2))
5	2	sqrtcld 15406	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘(𝐴↑2)) ∈ ℂ)
6		sqeqor 14181	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → ((𝐴↑2) = ((√‘(𝐴↑2))↑2) ↔ (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2)))))
7	5, 6	syldan 591	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((𝐴↑2) = ((√‘(𝐴↑2))↑2) ↔ (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2)))))
8	4, 7	mpbid 232	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴 = (√‘(𝐴↑2)) ∨ 𝐴 = -(√‘(𝐴↑2))))
9		1re 11174	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℝ
10	9	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 1 ∈ ℝ)
11	2	negnegd 11524	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → --(𝐴↑2) = (𝐴↑2))
12	11	fveq2d 6862	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘--(𝐴↑2)) = (√‘(𝐴↑2)))
13		ax-1cn 11126	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 1 ∈ ℂ
14		pncan2 11428	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((1 + (𝐴↑2)) − 1) = (𝐴↑2))
15	13, 2, 14	sylancr 587	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (𝐴↑2)) − 1) = (𝐴↑2))
16		simpr 484	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (𝐴↑2)) ∈ (-∞(,]0))
17		mnfxr 11231	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ -∞ ∈ ℝ^*
18		0re 11176	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ 0 ∈ ℝ
19		elioc2 13370	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (𝐴↑2)) ∈ (-∞(,]0) ↔ ((1 + (𝐴↑2)) ∈ ℝ ∧ -∞ < (1 + (𝐴↑2)) ∧ (1 + (𝐴↑2)) ≤ 0)))
20	17, 18, 19	mp2an 692	. . . . . . . . . . . . . . . . . . . . . . 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 11486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((1 + (𝐴↑2)) ∈ ℝ ∧ 1 ∈ ℝ) → ((1 + (𝐴↑2)) − 1) ∈ ℝ)
24	22, 9, 23	sylancl 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 + (𝐴↑2)) − 1) ∈ ℝ)
25	15, 24	eqeltrrd 2829	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴↑2) ∈ ℝ)
26	25	renegcld 11605	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(𝐴↑2) ∈ ℝ)
27		0red 11177	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ∈ ℝ)
28		0le1 11701	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 ≤ 1
29	28	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ 1)
30		subneg 11471	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
31	13, 2, 30	sylancr 587	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
32	21	simp3d 1144	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (𝐴↑2)) ≤ 0)
33	31, 32	eqbrtrd 5129	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(𝐴↑2)) ≤ 0)
34		suble0 11692	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℝ ∧ -(𝐴↑2) ∈ ℝ) → ((1 − -(𝐴↑2)) ≤ 0 ↔ 1 ≤ -(𝐴↑2)))
35	9, 26, 34	sylancr 587	. . . . . . . . . . . . . . . . . . . 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 11331	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ -(𝐴↑2))
38	26, 37	sqrtnegd 15388	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘--(𝐴↑2)) = (i · (√‘-(𝐴↑2))))
39	12, 38	eqtr3d 2766	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘(𝐴↑2)) = (i · (√‘-(𝐴↑2))))
40	39	oveq2d 7403	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) = (i · (i · (√‘-(𝐴↑2)))))
41		ax-icn 11127	. . . . . . . . . . . . . . . . 17 ⊢ i ∈ ℂ
42	41	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → i ∈ ℂ)
43	26, 37	resqrtcld 15384	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘-(𝐴↑2)) ∈ ℝ)
44	43	recnd 11202	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (√‘-(𝐴↑2)) ∈ ℂ)
45	42, 42, 44	mulassd 11197	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((i · i) · (√‘-(𝐴↑2))) = (i · (i · (√‘-(𝐴↑2)))))
46		ixi 11807	. . . . . . . . . . . . . . . . 17 ⊢ (i · i) = -1
47	46	oveq1i 7397	. . . . . . . . . . . . . . . 16 ⊢ ((i · i) · (√‘-(𝐴↑2))) = (-1 · (√‘-(𝐴↑2)))
48	44	mulm1d 11630	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (-1 · (√‘-(𝐴↑2))) = -(√‘-(𝐴↑2)))
49	47, 48	eqtrid 2776	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((i · i) · (√‘-(𝐴↑2))) = -(√‘-(𝐴↑2)))
50	40, 45, 49	3eqtr2d 2770	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) = -(√‘-(𝐴↑2)))
51	43	renegcld 11605	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(√‘-(𝐴↑2)) ∈ ℝ)
52	50, 51	eqeltrd 2828	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) ∈ ℝ)
53	10, 52	readdcld 11203	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ∈ ℝ)
54	53	mnfltd 13084	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -∞ < (1 + (i · (√‘(𝐴↑2)))))
55	50	oveq2d 7403	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) = (1 + -(√‘-(𝐴↑2))))
56		negsub 11470	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ (√‘-(𝐴↑2)) ∈ ℂ) → (1 + -(√‘-(𝐴↑2))) = (1 − (√‘-(𝐴↑2))))
57	13, 44, 56	sylancr 587	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + -(√‘-(𝐴↑2))) = (1 − (√‘-(𝐴↑2))))
58	55, 57	eqtrd 2764	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) = (1 − (√‘-(𝐴↑2))))
59		sq1 14160	. . . . . . . . . . . . . . . . 17 ⊢ (1↑2) = 1
60	59	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1↑2) = 1)
61	26	recnd 11202	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → -(𝐴↑2) ∈ ℂ)
62	61	sqsqrtd 15408	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((√‘-(𝐴↑2))↑2) = -(𝐴↑2))
63	36, 60, 62	3brtr4d 5139	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1↑2) ≤ ((√‘-(𝐴↑2))↑2))
64	26, 37	sqrtge0d 15387	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → 0 ≤ (√‘-(𝐴↑2)))
65	10, 43, 29, 64	le2sqd 14222	. . . . . . . . . . . . . . 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 11769	. . . . . . . . . . . . . 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 5129	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ≤ 0)
70		elioc2 13370	. . . . . . . . . . . . 13 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0) ↔ ((1 + (i · (√‘(𝐴↑2)))) ∈ ℝ ∧ -∞ < (1 + (i · (√‘(𝐴↑2)))) ∧ (1 + (i · (√‘(𝐴↑2)))) ≤ 0)))
71	17, 18, 70	mp2an 692	. . . . . . . . . . . 12 ⊢ ((1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0) ↔ ((1 + (i · (√‘(𝐴↑2)))) ∈ ℝ ∧ -∞ < (1 + (i · (√‘(𝐴↑2)))) ∧ (1 + (i · (√‘(𝐴↑2)))) ≤ 0))
72	53, 54, 69, 71	syl3anbrc 1344	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0))
73		oveq2 7395	. . . . . . . . . . . . 13 ⊢ (𝐴 = (√‘(𝐴↑2)) → (i · 𝐴) = (i · (√‘(𝐴↑2))))
74	73	oveq2d 7403	. . . . . . . . . . . 12 ⊢ (𝐴 = (√‘(𝐴↑2)) → (1 + (i · 𝐴)) = (1 + (i · (√‘(𝐴↑2)))))
75	74	eleq1d 2813	. . . . . . . . . . 11 ⊢ (𝐴 = (√‘(𝐴↑2)) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ↔ (1 + (i · (√‘(𝐴↑2)))) ∈ (-∞(,]0)))
76	72, 75	syl5ibrcom 247	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (𝐴 = (√‘(𝐴↑2)) → (1 + (i · 𝐴)) ∈ (-∞(,]0)))
77		mulneg2 11615	. . . . . . . . . . . . . . 15 ⊢ ((i ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → (i · -(√‘(𝐴↑2))) = -(i · (√‘(𝐴↑2))))
78	41, 5, 77	sylancr 587	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · -(√‘(𝐴↑2))) = -(i · (√‘(𝐴↑2))))
79	78	oveq2d 7403	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) = (1 − -(i · (√‘(𝐴↑2)))))
80		mulcl 11152	. . . . . . . . . . . . . . 15 ⊢ ((i ∈ ℂ ∧ (√‘(𝐴↑2)) ∈ ℂ) → (i · (√‘(𝐴↑2))) ∈ ℂ)
81	41, 5, 80	sylancr 587	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (i · (√‘(𝐴↑2))) ∈ ℂ)
82		subneg 11471	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ (i · (√‘(𝐴↑2))) ∈ ℂ) → (1 − -(i · (√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
83	13, 81, 82	sylancr 587	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − -(i · (√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
84	79, 83	eqtrd 2764	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) = (1 + (i · (√‘(𝐴↑2)))))
85	84, 72	eqeltrd 2828	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → (1 − (i · -(√‘(𝐴↑2)))) ∈ (-∞(,]0))
86		oveq2 7395	. . . . . . . . . . . . 13 ⊢ (𝐴 = -(√‘(𝐴↑2)) → (i · 𝐴) = (i · -(√‘(𝐴↑2))))
87	86	oveq2d 7403	. . . . . . . . . . . 12 ⊢ (𝐴 = -(√‘(𝐴↑2)) → (1 − (i · 𝐴)) = (1 − (i · -(√‘(𝐴↑2)))))
88	87	eleq1d 2813	. . . . . . . . . . 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 966	. . . . . . . . 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 871	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ (-∞(,]0)) → ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0)))
93	59	a1i 11	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → (1↑2) = 1)
94		sqmul 14084	. . . . . . . . . . . . 13 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
95	41, 94	mpan 690	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = ((i↑2) · (𝐴↑2)))
96		i2 14167	. . . . . . . . . . . . . 14 ⊢ (i↑2) = -1
97	96	oveq1i 7397	. . . . . . . . . . . . 13 ⊢ ((i↑2) · (𝐴↑2)) = (-1 · (𝐴↑2))
98	1	mulm1d 11630	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (-1 · (𝐴↑2)) = -(𝐴↑2))
99	97, 98	eqtrid 2776	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((i↑2) · (𝐴↑2)) = -(𝐴↑2))
100	95, 99	eqtrd 2764	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → ((i · 𝐴)↑2) = -(𝐴↑2))
101	93, 100	oveq12d 7405	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → ((1↑2) − ((i · 𝐴)↑2)) = (1 − -(𝐴↑2)))
102		mulcl 11152	. . . . . . . . . . . 12 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
103	41, 102	mpan 690	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℂ → (i · 𝐴) ∈ ℂ)
104		subsq 14175	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → ((1↑2) − ((i · 𝐴)↑2)) = ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
105	13, 103, 104	sylancr 587	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → ((1↑2) − ((i · 𝐴)↑2)) = ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
106	13, 1, 30	sylancr 587	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → (1 − -(𝐴↑2)) = (1 + (𝐴↑2)))
107	101, 105, 106	3eqtr3d 2772	. . . . . . . . 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 12261	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℂ
110	109	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℂ → 2 ∈ ℂ)
111	13	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℂ → 1 ∈ ℂ)
112	110, 111, 103	subsubd 11561	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → (2 − (1 − (i · 𝐴))) = ((2 − 1) + (i · 𝐴)))
113		2m1e1 12307	. . . . . . . . . . . . . . 15 ⊢ (2 − 1) = 1
114	113	oveq1i 7397	. . . . . . . . . . . . . 14 ⊢ ((2 − 1) + (i · 𝐴)) = (1 + (i · 𝐴))
115	112, 114	eqtrdi 2780	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (2 − (1 − (i · 𝐴))) = (1 + (i · 𝐴)))
116	115	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 − (i · 𝐴))) = (1 + (i · 𝐴)))
117		2re 12260	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
118		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ (-∞(,]0))
119		elioc2 13370	. . . . . . . . . . . . . . . 16 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 − (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 − (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 − (i · 𝐴)) ∧ (1 − (i · 𝐴)) ≤ 0)))
120	17, 18, 119	mp2an 692	. . . . . . . . . . . . . . 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 11486	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ ∧ (1 − (i · 𝐴)) ∈ ℝ) → (2 − (1 − (i · 𝐴))) ∈ ℝ)
124	117, 122, 123	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 − (i · 𝐴))) ∈ ℝ)
125	116, 124	eqeltrrd 2829	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ ℝ)
126	125, 122	remulcld 11204	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ)
127	126	mnfltd 13084	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
128	121	simp3d 1144	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ≤ 0)
129		0red 11177	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 ∈ ℝ)
130	117	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ∈ ℝ)
131		2pos 12289	. . . . . . . . . . . . . . 15 ⊢ 0 < 2
132	131	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 < 2)
133	109	subid1i 11494	. . . . . . . . . . . . . . . 16 ⊢ (2 − 0) = 2
134	122, 129, 130, 128	lesub2dd 11795	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (2 − 0) ≤ (2 − (1 − (i · 𝐴))))
135	133, 134	eqbrtrrid 5143	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (2 − (1 − (i · 𝐴))))
136	135, 116	breqtrd 5133	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (1 + (i · 𝐴)))
137	129, 130, 125, 132, 136	ltletrd 11334	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → 0 < (1 + (i · 𝐴)))
138		lemul2 12035	. . . . . . . . . . . . 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 1376	. . . . . . . . . . . 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 11150	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
142	13, 103, 141	sylancr 587	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (1 + (i · 𝐴)) ∈ ℂ)
143	142	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ ℂ)
144	143	mul01d 11373	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · 0) = 0)
145	140, 144	breqtrd 5133	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0)
146		elioc2 13370	. . . . . . . . . . 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 692	. . . . . . . . . 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 1344	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
149		simpr 484	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ∈ (-∞(,]0))
150		elioc2 13370	. . . . . . . . . . . . . 14 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ) → ((1 + (i · 𝐴)) ∈ (-∞(,]0) ↔ ((1 + (i · 𝐴)) ∈ ℝ ∧ -∞ < (1 + (i · 𝐴)) ∧ (1 + (i · 𝐴)) ≤ 0)))
151	17, 18, 150	mp2an 692	. . . . . . . . . . . . 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 11564	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → ((2 − 1) − (i · 𝐴)) = (2 − (1 + (i · 𝐴))))
155	113	oveq1i 7397	. . . . . . . . . . . . . 14 ⊢ ((2 − 1) − (i · 𝐴)) = (1 − (i · 𝐴))
156	154, 155	eqtr3di 2779	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (2 − (1 + (i · 𝐴))) = (1 − (i · 𝐴)))
157	156	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 + (i · 𝐴))) = (1 − (i · 𝐴)))
158		resubcl 11486	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℝ ∧ (1 + (i · 𝐴)) ∈ ℝ) → (2 − (1 + (i · 𝐴))) ∈ ℝ)
159	117, 153, 158	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − (1 + (i · 𝐴))) ∈ ℝ)
160	157, 159	eqeltrrd 2829	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ ℝ)
161	153, 160	remulcld 11204	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ ℝ)
162	161	mnfltd 13084	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → -∞ < ((1 + (i · 𝐴)) · (1 − (i · 𝐴))))
163	152	simp3d 1144	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 + (i · 𝐴)) ≤ 0)
164		0red 11177	. . . . . . . . . . . . 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 11795	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (2 − 0) ≤ (2 − (1 + (i · 𝐴))))
168	133, 167	eqbrtrrid 5143	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (2 − (1 + (i · 𝐴))))
169	168, 157	breqtrd 5133	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 2 ≤ (1 − (i · 𝐴)))
170	164, 165, 160, 166, 169	ltletrd 11334	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → 0 < (1 − (i · 𝐴)))
171		lemul1 12034	. . . . . . . . . . . . 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 1376	. . . . . . . . . . . 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 11202	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (1 − (i · 𝐴)) ∈ ℂ)
175	174	mul02d 11372	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → (0 · (1 − (i · 𝐴))) = 0)
176	173, 175	breqtrd 5133	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ≤ 0)
177	161, 162, 176, 147	syl3anbrc 1344	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (1 + (i · 𝐴)) ∈ (-∞(,]0)) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
178	148, 177	jaodan 959	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ ((1 − (i · 𝐴)) ∈ (-∞(,]0) ∨ (1 + (i · 𝐴)) ∈ (-∞(,]0))) → ((1 + (i · 𝐴)) · (1 − (i · 𝐴))) ∈ (-∞(,]0))
179	108, 178	eqeltrrd 2829	. . . . . . 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 985	. . . . 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 11150	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → (1 + (𝐴↑2)) ∈ ℂ)
185	13, 1, 184	sylancr 587	. . . . 5 ⊢ (𝐴 ∈ ℂ → (1 + (𝐴↑2)) ∈ ℂ)
186		atansopn.d	. . . . . . . 8 ⊢ 𝐷 = (ℂ ∖ (-∞(,]0))
187	186	eleq2i 2820	. . . . . . 7 ⊢ ((1 + (𝐴↑2)) ∈ 𝐷 ↔ (1 + (𝐴↑2)) ∈ (ℂ ∖ (-∞(,]0)))
188		eldif 3924	. . . . . . 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 11420	. . . . . . 7 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
193	13, 103, 192	sylancr 587	. . . . . 6 ⊢ (𝐴 ∈ ℂ → (1 − (i · 𝐴)) ∈ ℂ)
194	186	eleq2i 2820	. . . . . . . 8 ⊢ ((1 − (i · 𝐴)) ∈ 𝐷 ↔ (1 − (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)))
195		eldif 3924	. . . . . . . 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 2820	. . . . . . . 8 ⊢ ((1 + (i · 𝐴)) ∈ 𝐷 ↔ (1 + (i · 𝐴)) ∈ (ℂ ∖ (-∞(,]0)))
200		eldif 3924	. . . . . . . 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 632	. . . 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 26840	. 2 ⊢ (𝐴 ∈ 𝑆 ↔ (𝐴 ∈ ℂ ∧ (1 + (𝐴↑2)) ∈ 𝐷))
209		3anass 1094	. 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 847 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 {crab 3405 ∖ cdif 3911 class class class wbr 5107 ‘cfv 6511 (class class class)co 7387 ℂcc 11066 ℝcr 11067 0cc0 11068 1c1 11069 ici 11070 + caddc 11071 · cmul 11073 -∞cmnf 11206 ℝ^*cxr 11207 < clt 11208 ≤ cle 11209 − cmin 11405 -cneg 11406 2c2 12241 (,]cioc 13307 ↑cexp 14026 √csqrt 15199

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-sep 5251 ax-nul 5261 ax-pow 5320 ax-pr 5387 ax-un 7711 ax-cnex 11124 ax-resscn 11125 ax-1cn 11126 ax-icn 11127 ax-addcl 11128 ax-addrcl 11129 ax-mulcl 11130 ax-mulrcl 11131 ax-mulcom 11132 ax-addass 11133 ax-mulass 11134 ax-distr 11135 ax-i2m1 11136 ax-1ne0 11137 ax-1rid 11138 ax-rnegex 11139 ax-rrecex 11140 ax-cnre 11141 ax-pre-lttri 11142 ax-pre-lttrn 11143 ax-pre-ltadd 11144 ax-pre-mulgt0 11145 ax-pre-sup 11146

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3354 df-reu 3355 df-rab 3406 df-v 3449 df-sbc 3754 df-csb 3863 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3934 df-nul 4297 df-if 4489 df-pw 4565 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4872 df-iun 4957 df-br 5108 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5533 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5591 df-we 5593 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6274 df-ord 6335 df-on 6336 df-lim 6337 df-suc 6338 df-iota 6464 df-fun 6513 df-fn 6514 df-f 6515 df-f1 6516 df-fo 6517 df-f1o 6518 df-fv 6519 df-riota 7344 df-ov 7390 df-oprab 7391 df-mpo 7392 df-om 7843 df-2nd 7969 df-frecs 8260 df-wrecs 8291 df-recs 8340 df-rdg 8378 df-er 8671 df-en 8919 df-dom 8920 df-sdom 8921 df-sup 9393 df-pnf 11210 df-mnf 11211 df-xr 11212 df-ltxr 11213 df-le 11214 df-sub 11407 df-neg 11408 df-div 11836 df-nn 12187 df-2 12249 df-3 12250 df-n0 12443 df-z 12530 df-uz 12794 df-rp 12952 df-ioc 13311 df-seq 13967 df-exp 14027 df-cj 15065 df-re 15066 df-im 15067 df-sqrt 15201 df-abs 15202

This theorem is referenced by: dvatan 26845

W3C validator