Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  constrsuc Structured version   Visualization version   GIF version

Theorem constrsuc 33746
Description: Membership in the successor step of the construction of constructible numbers. (Contributed by Thierry Arnoux, 25-Jun-2025.)
Hypotheses
Ref Expression
constr0.1 𝐶 = rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})
constrsuc.1 (𝜑𝑁 ∈ On)
constrsuc.2 𝑆 = (𝐶𝑁)
Assertion
Ref Expression
constrsuc (𝜑 → (𝑋 ∈ (𝐶‘suc 𝑁) ↔ (𝑋 ∈ ℂ ∧ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))))
Distinct variable groups:   𝑆,𝑎,𝑠,𝑥   𝑆,𝑏,𝑠,𝑥   𝑆,𝑐,𝑠,𝑥   𝑆,𝑑,𝑠,𝑥   𝑆,𝑒,𝑠,𝑥   𝑆,𝑓,𝑠,𝑥   𝑋,𝑎   𝑋,𝑏   𝑋,𝑐   𝑋,𝑑   𝑒,𝑋   𝑓,𝑋   𝑋,𝑟   𝑡,𝑋   𝜑,𝑠   𝑠,𝑟,𝑥   𝑡,𝑠,𝑥
Allowed substitution hints:   𝜑(𝑥,𝑡,𝑒,𝑓,𝑟,𝑎,𝑏,𝑐,𝑑)   𝐶(𝑥,𝑡,𝑒,𝑓,𝑠,𝑟,𝑎,𝑏,𝑐,𝑑)   𝑆(𝑡,𝑟)   𝑁(𝑥,𝑡,𝑒,𝑓,𝑠,𝑟,𝑎,𝑏,𝑐,𝑑)   𝑋(𝑥,𝑠)

Proof of Theorem constrsuc
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 constr0.1 . . . . . 6 𝐶 = rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})
21fveq1i 6823 . . . . 5 (𝐶‘suc 𝑁) = (rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘suc 𝑁)
3 constrsuc.1 . . . . . 6 (𝜑𝑁 ∈ On)
4 rdgsuc 8343 . . . . . 6 (𝑁 ∈ On → (rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘suc 𝑁) = ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘(rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁)))
53, 4syl 17 . . . . 5 (𝜑 → (rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘suc 𝑁) = ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘(rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁)))
62, 5eqtrid 2778 . . . 4 (𝜑 → (𝐶‘suc 𝑁) = ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘(rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁)))
7 constrsuc.2 . . . . . 6 𝑆 = (𝐶𝑁)
81fveq1i 6823 . . . . . 6 (𝐶𝑁) = (rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁)
97, 8eqtri 2754 . . . . 5 𝑆 = (rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁)
109fveq2i 6825 . . . 4 ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘𝑆) = ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘(rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})‘𝑁))
116, 10eqtr4di 2784 . . 3 (𝜑 → (𝐶‘suc 𝑁) = ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘𝑆))
1211eleq2d 2817 . 2 (𝜑 → (𝑋 ∈ (𝐶‘suc 𝑁) ↔ 𝑋 ∈ ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘𝑆)))
13 eqid 2731 . . . 4 (𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}) = (𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})
14 id 22 . . . . . . . 8 (𝑠 = 𝑆𝑠 = 𝑆)
15 rexeq 3288 . . . . . . . . . 10 (𝑠 = 𝑆 → (∃𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
1614, 15rexeqbidv 3313 . . . . . . . . 9 (𝑠 = 𝑆 → (∃𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
1714, 16rexeqbidv 3313 . . . . . . . 8 (𝑠 = 𝑆 → (∃𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
1814, 17rexeqbidv 3313 . . . . . . 7 (𝑠 = 𝑆 → (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
19 rexeq 3288 . . . . . . . . . . 11 (𝑠 = 𝑆 → (∃𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)))))
2014, 19rexeqbidv 3313 . . . . . . . . . 10 (𝑠 = 𝑆 → (∃𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)))))
2114, 20rexeqbidv 3313 . . . . . . . . 9 (𝑠 = 𝑆 → (∃𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)))))
2214, 21rexeqbidv 3313 . . . . . . . 8 (𝑠 = 𝑆 → (∃𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)))))
2314, 22rexeqbidvv 3302 . . . . . . 7 (𝑠 = 𝑆 → (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)))))
24 rexeq 3288 . . . . . . . . . . . 12 (𝑠 = 𝑆 → (∃𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
2514, 24rexeqbidv 3313 . . . . . . . . . . 11 (𝑠 = 𝑆 → (∃𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
2614, 25rexeqbidv 3313 . . . . . . . . . 10 (𝑠 = 𝑆 → (∃𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
2714, 26rexeqbidv 3313 . . . . . . . . 9 (𝑠 = 𝑆 → (∃𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
2814, 27rexeqbidv 3313 . . . . . . . 8 (𝑠 = 𝑆 → (∃𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
2914, 28rexeqbidvv 3302 . . . . . . 7 (𝑠 = 𝑆 → (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))))
3018, 23, 293orbi123d 1437 . . . . . 6 (𝑠 = 𝑆 → ((∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))) ↔ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))))
3130rabbidv 3402 . . . . 5 (𝑠 = 𝑆 → {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} = {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})
3231adantl 481 . . . 4 ((𝜑𝑠 = 𝑆) → {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} = {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})
337fvexi 6836 . . . . 5 𝑆 ∈ V
3433a1i 11 . . . 4 (𝜑𝑆 ∈ V)
35 cnex 11084 . . . . . 6 ℂ ∈ V
36 ssrab2 4030 . . . . . 6 {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ⊆ ℂ
3735, 36ssexi 5260 . . . . 5 {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ∈ V
3837a1i 11 . . . 4 (𝜑 → {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ∈ V)
3913, 32, 34, 38fvmptd2 6937 . . 3 (𝜑 → ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘𝑆) = {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})
4039eleq2d 2817 . 2 (𝜑 → (𝑋 ∈ ((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))})‘𝑆) ↔ 𝑋 ∈ {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}))
41 eqeq1 2735 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ↔ 𝑦 = (𝑎 + (𝑡 · (𝑏𝑎)))))
42 eqeq1 2735 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ↔ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐)))))
4341, 423anbi12d 1439 . . . . . . . . . 10 (𝑥 = 𝑦 → ((𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
44432rexbidv 3197 . . . . . . . . 9 (𝑥 = 𝑦 → (∃𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
45442rexbidv 3197 . . . . . . . 8 (𝑥 = 𝑦 → (∃𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
46452rexbidv 3197 . . . . . . 7 (𝑥 = 𝑦 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
47 fvoveq1 7369 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (abs‘(𝑥𝑐)) = (abs‘(𝑦𝑐)))
4847eqeq1d 2733 . . . . . . . . . . 11 (𝑥 = 𝑦 → ((abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓)) ↔ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))))
4941, 48anbi12d 632 . . . . . . . . . 10 (𝑥 = 𝑦 → ((𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓)))))
50492rexbidv 3197 . . . . . . . . 9 (𝑥 = 𝑦 → (∃𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓)))))
51502rexbidv 3197 . . . . . . . 8 (𝑥 = 𝑦 → (∃𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓)))))
52512rexbidv 3197 . . . . . . 7 (𝑥 = 𝑦 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓)))))
53 fvoveq1 7369 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (abs‘(𝑥𝑎)) = (abs‘(𝑦𝑎)))
5453eqeq1d 2733 . . . . . . . . . . 11 (𝑥 = 𝑦 → ((abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ↔ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐))))
55 fvoveq1 7369 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (abs‘(𝑥𝑑)) = (abs‘(𝑦𝑑)))
5655eqeq1d 2733 . . . . . . . . . . 11 (𝑥 = 𝑦 → ((abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)) ↔ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))))
5754, 563anbi23d 1441 . . . . . . . . . 10 (𝑥 = 𝑦 → ((𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)))))
58572rexbidv 3197 . . . . . . . . 9 (𝑥 = 𝑦 → (∃𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)))))
59582rexbidv 3197 . . . . . . . 8 (𝑥 = 𝑦 → (∃𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)))))
60592rexbidv 3197 . . . . . . 7 (𝑥 = 𝑦 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)))))
6146, 52, 603orbi123d 1437 . . . . . 6 (𝑥 = 𝑦 → ((∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓)))) ↔ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))))))
6261cbvrabv 3405 . . . . 5 {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} = {𝑦 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))))}
6362eleq2i 2823 . . . 4 (𝑋 ∈ {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ↔ 𝑋 ∈ {𝑦 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))))})
64 eqeq1 2735 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ↔ 𝑋 = (𝑎 + (𝑡 · (𝑏𝑎)))))
65 eqeq1 2735 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ↔ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐)))))
6664, 653anbi12d 1439 . . . . . . . . 9 (𝑦 = 𝑋 → ((𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
67662rexbidv 3197 . . . . . . . 8 (𝑦 = 𝑋 → (∃𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
68672rexbidv 3197 . . . . . . 7 (𝑦 = 𝑋 → (∃𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
69682rexbidv 3197 . . . . . 6 (𝑦 = 𝑋 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0)))
70 fvoveq1 7369 . . . . . . . . . . 11 (𝑦 = 𝑋 → (abs‘(𝑦𝑐)) = (abs‘(𝑋𝑐)))
7170eqeq1d 2733 . . . . . . . . . 10 (𝑦 = 𝑋 → ((abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓)) ↔ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))))
7264, 71anbi12d 632 . . . . . . . . 9 (𝑦 = 𝑋 → ((𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ↔ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓)))))
73722rexbidv 3197 . . . . . . . 8 (𝑦 = 𝑋 → (∃𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓)))))
74732rexbidv 3197 . . . . . . 7 (𝑦 = 𝑋 → (∃𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓)))))
75742rexbidv 3197 . . . . . 6 (𝑦 = 𝑋 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓)))))
76 fvoveq1 7369 . . . . . . . . . . 11 (𝑦 = 𝑋 → (abs‘(𝑦𝑎)) = (abs‘(𝑋𝑎)))
7776eqeq1d 2733 . . . . . . . . . 10 (𝑦 = 𝑋 → ((abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ↔ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐))))
78 fvoveq1 7369 . . . . . . . . . . 11 (𝑦 = 𝑋 → (abs‘(𝑦𝑑)) = (abs‘(𝑋𝑑)))
7978eqeq1d 2733 . . . . . . . . . 10 (𝑦 = 𝑋 → ((abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)) ↔ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓))))
8077, 793anbi23d 1441 . . . . . . . . 9 (𝑦 = 𝑋 → ((𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))) ↔ (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))
81802rexbidv 3197 . . . . . . . 8 (𝑦 = 𝑋 → (∃𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))
82812rexbidv 3197 . . . . . . 7 (𝑦 = 𝑋 → (∃𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))
83822rexbidv 3197 . . . . . 6 (𝑦 = 𝑋 → (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))) ↔ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))
8469, 75, 833orbi123d 1437 . . . . 5 (𝑦 = 𝑋 → ((∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓)))) ↔ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓))))))
8584elrab 3647 . . . 4 (𝑋 ∈ {𝑦 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑦 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑦 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑦𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑦𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑦𝑑)) = (abs‘(𝑒𝑓))))} ↔ (𝑋 ∈ ℂ ∧ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓))))))
8663, 85bitri 275 . . 3 (𝑋 ∈ {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ↔ (𝑋 ∈ ℂ ∧ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓))))))
8786a1i 11 . 2 (𝜑 → (𝑋 ∈ {𝑥 ∈ ℂ ∣ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))} ↔ (𝑋 ∈ ℂ ∧ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))))
8812, 40, 873bitrd 305 1 (𝜑 → (𝑋 ∈ (𝐶‘suc 𝑁) ↔ (𝑋 ∈ ℂ ∧ (∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑋 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑒𝑆𝑓𝑆𝑡 ∈ ℝ (𝑋 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑋𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑆𝑏𝑆𝑐𝑆𝑑𝑆𝑒𝑆𝑓𝑆 (𝑎𝑑 ∧ (abs‘(𝑋𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑋𝑑)) = (abs‘(𝑒𝑓)))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3o 1085  w3a 1086   = wceq 1541  wcel 2111  wne 2928  wrex 3056  {crab 3395  Vcvv 3436  {cpr 4578  cmpt 5172  Oncon0 6306  suc csuc 6308  cfv 6481  (class class class)co 7346  reccrdg 8328  cc 11001  cr 11002  0cc0 11003  1c1 11004   + caddc 11006   · cmul 11008  cmin 11341  ccj 15000  cim 15002  abscabs 15138
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5217  ax-sep 5234  ax-nul 5244  ax-pr 5370  ax-un 7668  ax-cnex 11059
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-ral 3048  df-rex 3057  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4476  df-pw 4552  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-iun 4943  df-br 5092  df-opab 5154  df-mpt 5173  df-tr 5199  df-id 5511  df-eprel 5516  df-po 5524  df-so 5525  df-fr 5569  df-we 5571  df-xp 5622  df-rel 5623  df-cnv 5624  df-co 5625  df-dm 5626  df-rn 5627  df-res 5628  df-ima 5629  df-pred 6248  df-ord 6309  df-on 6310  df-lim 6311  df-suc 6312  df-iota 6437  df-fun 6483  df-fn 6484  df-f 6485  df-f1 6486  df-fo 6487  df-f1o 6488  df-fv 6489  df-ov 7349  df-2nd 7922  df-frecs 8211  df-wrecs 8242  df-recs 8291  df-rdg 8329
This theorem is referenced by:  constrsscn  33748  constrsslem  33749  constrconj  33753  constrfin  33754  constrelextdg2  33755  constrllcllem  33760  constrlccllem  33761  constrcccllem  33762
  Copyright terms: Public domain W3C validator