Users' Mathboxes Mathbox for Jim Kingdon < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >   Mathboxes  >  qdencn GIF version

Theorem qdencn 11070
Description: The set of complex numbers whose real and imaginary parts are rational is dense in the complex plane. This is a two dimensional analogue to qdenre 10307 (and also would hold for ℝ × ℝ with the usual metric; this is not about complex numbers in particular). (Contributed by Jim Kingdon, 18-Oct-2021.)
Hypothesis
Ref Expression
qdencn.q 𝑄 = {𝑧 ∈ ℂ ∣ ((ℜ‘𝑧) ∈ ℚ ∧ (ℑ‘𝑧) ∈ ℚ)}
Assertion
Ref Expression
qdencn ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → ∃𝑥𝑄 (abs‘(𝑥𝐴)) < 𝐵)
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝑄
Allowed substitution hints:   𝐴(𝑧)   𝐵(𝑧)   𝑄(𝑧)

Proof of Theorem qdencn
Dummy variables 𝑢 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpl 107 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → 𝐴 ∈ ℂ)
21recld 10044 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → (ℜ‘𝐴) ∈ ℝ)
3 simpr 108 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → 𝐵 ∈ ℝ+)
43rphalfcld 8937 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → (𝐵 / 2) ∈ ℝ+)
5 qdenre 10307 . . 3 (((ℜ‘𝐴) ∈ ℝ ∧ (𝐵 / 2) ∈ ℝ+) → ∃𝑢 ∈ ℚ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))
62, 4, 5syl2anc 403 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → ∃𝑢 ∈ ℚ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))
7 simpll 496 . . . . 5 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → 𝐴 ∈ ℂ)
87imcld 10045 . . . 4 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → (ℑ‘𝐴) ∈ ℝ)
94adantr 270 . . . 4 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → (𝐵 / 2) ∈ ℝ+)
10 qdenre 10307 . . . 4 (((ℑ‘𝐴) ∈ ℝ ∧ (𝐵 / 2) ∈ ℝ+) → ∃𝑣 ∈ ℚ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))
118, 9, 10syl2anc 403 . . 3 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → ∃𝑣 ∈ ℚ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))
12 qcn 8870 . . . . . . . 8 (𝑢 ∈ ℚ → 𝑢 ∈ ℂ)
1312ad2antrl 474 . . . . . . 7 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → 𝑢 ∈ ℂ)
1413adantr 270 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑢 ∈ ℂ)
15 ax-icn 7203 . . . . . . . 8 i ∈ ℂ
1615a1i 9 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → i ∈ ℂ)
17 qcn 8870 . . . . . . . 8 (𝑣 ∈ ℚ → 𝑣 ∈ ℂ)
1817ad2antrl 474 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑣 ∈ ℂ)
1916, 18mulcld 7271 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (i · 𝑣) ∈ ℂ)
2014, 19addcld 7270 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (𝑢 + (i · 𝑣)) ∈ ℂ)
21 qre 8861 . . . . . . . . . 10 (𝑢 ∈ ℚ → 𝑢 ∈ ℝ)
2221ad2antrl 474 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → 𝑢 ∈ ℝ)
2322adantr 270 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑢 ∈ ℝ)
24 qre 8861 . . . . . . . . 9 (𝑣 ∈ ℚ → 𝑣 ∈ ℝ)
2524ad2antrl 474 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑣 ∈ ℝ)
2623, 25crred 10082 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℜ‘(𝑢 + (i · 𝑣))) = 𝑢)
27 simplrl 502 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑢 ∈ ℚ)
2826, 27eqeltrd 2159 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℜ‘(𝑢 + (i · 𝑣))) ∈ ℚ)
2923, 25crimd 10083 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℑ‘(𝑢 + (i · 𝑣))) = 𝑣)
30 simprl 498 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝑣 ∈ ℚ)
3129, 30eqeltrd 2159 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℑ‘(𝑢 + (i · 𝑣))) ∈ ℚ)
3228, 31jca 300 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((ℜ‘(𝑢 + (i · 𝑣))) ∈ ℚ ∧ (ℑ‘(𝑢 + (i · 𝑣))) ∈ ℚ))
33 fveq2 5230 . . . . . . . 8 (𝑧 = (𝑢 + (i · 𝑣)) → (ℜ‘𝑧) = (ℜ‘(𝑢 + (i · 𝑣))))
3433eleq1d 2151 . . . . . . 7 (𝑧 = (𝑢 + (i · 𝑣)) → ((ℜ‘𝑧) ∈ ℚ ↔ (ℜ‘(𝑢 + (i · 𝑣))) ∈ ℚ))
35 fveq2 5230 . . . . . . . 8 (𝑧 = (𝑢 + (i · 𝑣)) → (ℑ‘𝑧) = (ℑ‘(𝑢 + (i · 𝑣))))
3635eleq1d 2151 . . . . . . 7 (𝑧 = (𝑢 + (i · 𝑣)) → ((ℑ‘𝑧) ∈ ℚ ↔ (ℑ‘(𝑢 + (i · 𝑣))) ∈ ℚ))
3734, 36anbi12d 457 . . . . . 6 (𝑧 = (𝑢 + (i · 𝑣)) → (((ℜ‘𝑧) ∈ ℚ ∧ (ℑ‘𝑧) ∈ ℚ) ↔ ((ℜ‘(𝑢 + (i · 𝑣))) ∈ ℚ ∧ (ℑ‘(𝑢 + (i · 𝑣))) ∈ ℚ)))
38 qdencn.q . . . . . 6 𝑄 = {𝑧 ∈ ℂ ∣ ((ℜ‘𝑧) ∈ ℚ ∧ (ℑ‘𝑧) ∈ ℚ)}
3937, 38elrab2 2760 . . . . 5 ((𝑢 + (i · 𝑣)) ∈ 𝑄 ↔ ((𝑢 + (i · 𝑣)) ∈ ℂ ∧ ((ℜ‘(𝑢 + (i · 𝑣))) ∈ ℚ ∧ (ℑ‘(𝑢 + (i · 𝑣))) ∈ ℚ)))
4020, 32, 39sylanbrc 408 . . . 4 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (𝑢 + (i · 𝑣)) ∈ 𝑄)
417adantr 270 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝐴 ∈ ℂ)
4220, 41subcld 7556 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((𝑢 + (i · 𝑣)) − 𝐴) ∈ ℂ)
4342abscld 10286 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) ∈ ℝ)
442ad2antrr 472 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℜ‘𝐴) ∈ ℝ)
4544recnd 7279 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℜ‘𝐴) ∈ ℂ)
4614, 45subcld 7556 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (𝑢 − (ℜ‘𝐴)) ∈ ℂ)
4746abscld 10286 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(𝑢 − (ℜ‘𝐴))) ∈ ℝ)
488adantr 270 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℑ‘𝐴) ∈ ℝ)
4948recnd 7279 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (ℑ‘𝐴) ∈ ℂ)
5018, 49subcld 7556 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (𝑣 − (ℑ‘𝐴)) ∈ ℂ)
5150abscld 10286 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(𝑣 − (ℑ‘𝐴))) ∈ ℝ)
5247, 51readdcld 7280 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘(𝑣 − (ℑ‘𝐴)))) ∈ ℝ)
533ad2antrr 472 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝐵 ∈ ℝ+)
5453rpred 8924 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → 𝐵 ∈ ℝ)
551replimd 10047 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
5655oveq2d 5580 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → ((𝑢 + (i · 𝑣)) − 𝐴) = ((𝑢 + (i · 𝑣)) − ((ℜ‘𝐴) + (i · (ℑ‘𝐴)))))
5756ad2antrr 472 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((𝑢 + (i · 𝑣)) − 𝐴) = ((𝑢 + (i · 𝑣)) − ((ℜ‘𝐴) + (i · (ℑ‘𝐴)))))
5816, 49mulcld 7271 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (i · (ℑ‘𝐴)) ∈ ℂ)
5914, 19, 45, 58addsub4d 7603 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((𝑢 + (i · 𝑣)) − ((ℜ‘𝐴) + (i · (ℑ‘𝐴)))) = ((𝑢 − (ℜ‘𝐴)) + ((i · 𝑣) − (i · (ℑ‘𝐴)))))
6057, 59eqtrd 2115 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((𝑢 + (i · 𝑣)) − 𝐴) = ((𝑢 − (ℜ‘𝐴)) + ((i · 𝑣) − (i · (ℑ‘𝐴)))))
6160fveq2d 5234 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) = (abs‘((𝑢 − (ℜ‘𝐴)) + ((i · 𝑣) − (i · (ℑ‘𝐴))))))
6219, 58subcld 7556 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((i · 𝑣) − (i · (ℑ‘𝐴))) ∈ ℂ)
6346, 62abstrid 10301 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 − (ℜ‘𝐴)) + ((i · 𝑣) − (i · (ℑ‘𝐴))))) ≤ ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘((i · 𝑣) − (i · (ℑ‘𝐴))))))
6461, 63eqbrtrd 3825 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) ≤ ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘((i · 𝑣) − (i · (ℑ‘𝐴))))))
6516, 50absmuld 10299 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(i · (𝑣 − (ℑ‘𝐴)))) = ((abs‘i) · (abs‘(𝑣 − (ℑ‘𝐴)))))
6616, 18, 49subdid 7655 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (i · (𝑣 − (ℑ‘𝐴))) = ((i · 𝑣) − (i · (ℑ‘𝐴))))
6766fveq2d 5234 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(i · (𝑣 − (ℑ‘𝐴)))) = (abs‘((i · 𝑣) − (i · (ℑ‘𝐴)))))
68 absi 10164 . . . . . . . . . 10 (abs‘i) = 1
6968oveq1i 5574 . . . . . . . . 9 ((abs‘i) · (abs‘(𝑣 − (ℑ‘𝐴)))) = (1 · (abs‘(𝑣 − (ℑ‘𝐴))))
7051recnd 7279 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(𝑣 − (ℑ‘𝐴))) ∈ ℂ)
7170mulid2d 7269 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (1 · (abs‘(𝑣 − (ℑ‘𝐴)))) = (abs‘(𝑣 − (ℑ‘𝐴))))
7269, 71syl5eq 2127 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((abs‘i) · (abs‘(𝑣 − (ℑ‘𝐴)))) = (abs‘(𝑣 − (ℑ‘𝐴))))
7365, 67, 723eqtr3d 2123 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((i · 𝑣) − (i · (ℑ‘𝐴)))) = (abs‘(𝑣 − (ℑ‘𝐴))))
7473oveq2d 5580 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘((i · 𝑣) − (i · (ℑ‘𝐴))))) = ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘(𝑣 − (ℑ‘𝐴)))))
7564, 74breqtrd 3829 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) ≤ ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘(𝑣 − (ℑ‘𝐴)))))
76 simplrr 503 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))
77 simprr 499 . . . . . 6 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))
7847, 51, 54, 76, 77lt2halvesd 8415 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ((abs‘(𝑢 − (ℜ‘𝐴))) + (abs‘(𝑣 − (ℑ‘𝐴)))) < 𝐵)
7943, 52, 54, 75, 78lelttrd 7371 . . . 4 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) < 𝐵)
80 oveq1 5571 . . . . . . 7 (𝑥 = (𝑢 + (i · 𝑣)) → (𝑥𝐴) = ((𝑢 + (i · 𝑣)) − 𝐴))
8180fveq2d 5234 . . . . . 6 (𝑥 = (𝑢 + (i · 𝑣)) → (abs‘(𝑥𝐴)) = (abs‘((𝑢 + (i · 𝑣)) − 𝐴)))
8281breq1d 3815 . . . . 5 (𝑥 = (𝑢 + (i · 𝑣)) → ((abs‘(𝑥𝐴)) < 𝐵 ↔ (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) < 𝐵))
8382rspcev 2710 . . . 4 (((𝑢 + (i · 𝑣)) ∈ 𝑄 ∧ (abs‘((𝑢 + (i · 𝑣)) − 𝐴)) < 𝐵) → ∃𝑥𝑄 (abs‘(𝑥𝐴)) < 𝐵)
8440, 79, 83syl2anc 403 . . 3 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) ∧ (𝑣 ∈ ℚ ∧ (abs‘(𝑣 − (ℑ‘𝐴))) < (𝐵 / 2))) → ∃𝑥𝑄 (abs‘(𝑥𝐴)) < 𝐵)
8511, 84rexlimddv 2486 . 2 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) ∧ (𝑢 ∈ ℚ ∧ (abs‘(𝑢 − (ℜ‘𝐴))) < (𝐵 / 2))) → ∃𝑥𝑄 (abs‘(𝑥𝐴)) < 𝐵)
866, 85rexlimddv 2486 1 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℝ+) → ∃𝑥𝑄 (abs‘(𝑥𝐴)) < 𝐵)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102   = wceq 1285  wcel 1434  wrex 2354  {crab 2357   class class class wbr 3805  cfv 4952  (class class class)co 5564  cc 7111  cr 7112  1c1 7114  ici 7115   + caddc 7116   · cmul 7118   < clt 7285  cle 7286  cmin 7416   / cdiv 7897  2c2 8226  cq 8855  +crp 8885  cre 9946  cim 9947  abscabs 10102
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-coll 3913  ax-sep 3916  ax-nul 3924  ax-pow 3968  ax-pr 3992  ax-un 4216  ax-setind 4308  ax-iinf 4357  ax-cnex 7199  ax-resscn 7200  ax-1cn 7201  ax-1re 7202  ax-icn 7203  ax-addcl 7204  ax-addrcl 7205  ax-mulcl 7206  ax-mulrcl 7207  ax-addcom 7208  ax-mulcom 7209  ax-addass 7210  ax-mulass 7211  ax-distr 7212  ax-i2m1 7213  ax-0lt1 7214  ax-1rid 7215  ax-0id 7216  ax-rnegex 7217  ax-precex 7218  ax-cnre 7219  ax-pre-ltirr 7220  ax-pre-ltwlin 7221  ax-pre-lttrn 7222  ax-pre-apti 7223  ax-pre-ltadd 7224  ax-pre-mulgt0 7225  ax-pre-mulext 7226  ax-arch 7227  ax-caucvg 7228
This theorem depends on definitions:  df-bi 115  df-dc 777  df-3or 921  df-3an 922  df-tru 1288  df-fal 1291  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ne 2250  df-nel 2345  df-ral 2358  df-rex 2359  df-reu 2360  df-rmo 2361  df-rab 2362  df-v 2612  df-sbc 2825  df-csb 2918  df-dif 2984  df-un 2986  df-in 2988  df-ss 2995  df-nul 3268  df-if 3369  df-pw 3402  df-sn 3422  df-pr 3423  df-op 3425  df-uni 3622  df-int 3657  df-iun 3700  df-br 3806  df-opab 3860  df-mpt 3861  df-tr 3896  df-id 4076  df-po 4079  df-iso 4080  df-iord 4149  df-on 4151  df-ilim 4152  df-suc 4154  df-iom 4360  df-xp 4397  df-rel 4398  df-cnv 4399  df-co 4400  df-dm 4401  df-rn 4402  df-res 4403  df-ima 4404  df-iota 4917  df-fun 4954  df-fn 4955  df-f 4956  df-f1 4957  df-fo 4958  df-f1o 4959  df-fv 4960  df-riota 5520  df-ov 5567  df-oprab 5568  df-mpt2 5569  df-1st 5819  df-2nd 5820  df-recs 5975  df-frec 6061  df-pnf 7287  df-mnf 7288  df-xr 7289  df-ltxr 7290  df-le 7291  df-sub 7418  df-neg 7419  df-reap 7812  df-ap 7819  df-div 7898  df-inn 8177  df-2 8235  df-3 8236  df-4 8237  df-n0 8426  df-z 8503  df-uz 8771  df-q 8856  df-rp 8886  df-iseq 9592  df-iexp 9643  df-cj 9948  df-re 9949  df-im 9950  df-rsqrt 10103  df-abs 10104
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator