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

Theorem cgsex4gOLD 3453
Description: Obsolete version of cgsex4g 3452 as of 28-Jun-2024. (Contributed by NM, 5-Aug-1995.) Avoid ax-10 2141. (Revised by Gino Giotto, 20-Aug-2023.) (Proof modification is discouraged.) (New usage is discouraged.)
Hypotheses
Ref Expression
cgsex4gOLD.1 (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) → 𝜒)
cgsex4gOLD.2 (𝜒 → (𝜑𝜓))
Assertion
Ref Expression
cgsex4gOLD (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → (∃𝑥𝑦𝑧𝑤(𝜒𝜑) ↔ 𝜓))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑤,𝐴   𝑥,𝐵,𝑦,𝑧,𝑤   𝑥,𝐶,𝑦,𝑧,𝑤   𝑥,𝐷,𝑦,𝑧,𝑤   𝜓,𝑥,𝑦,𝑧,𝑤
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤)   𝜒(𝑥,𝑦,𝑧,𝑤)   𝑅(𝑥,𝑦,𝑧,𝑤)   𝑆(𝑥,𝑦,𝑧,𝑤)

Proof of Theorem cgsex4gOLD
StepHypRef Expression
1 cgsex4gOLD.2 . . . . 5 (𝜒 → (𝜑𝜓))
21biimpa 480 . . . 4 ((𝜒𝜑) → 𝜓)
32exlimivv 1940 . . 3 (∃𝑧𝑤(𝜒𝜑) → 𝜓)
43exlimivv 1940 . 2 (∃𝑥𝑦𝑧𝑤(𝜒𝜑) → 𝜓)
5 elisset 2819 . . . . . . . 8 (𝐴𝑅 → ∃𝑥 𝑥 = 𝐴)
6 elisset 2819 . . . . . . . 8 (𝐵𝑆 → ∃𝑦 𝑦 = 𝐵)
75, 6anim12i 616 . . . . . . 7 ((𝐴𝑅𝐵𝑆) → (∃𝑥 𝑥 = 𝐴 ∧ ∃𝑦 𝑦 = 𝐵))
8 exdistrv 1964 . . . . . . 7 (∃𝑥𝑦(𝑥 = 𝐴𝑦 = 𝐵) ↔ (∃𝑥 𝑥 = 𝐴 ∧ ∃𝑦 𝑦 = 𝐵))
97, 8sylibr 237 . . . . . 6 ((𝐴𝑅𝐵𝑆) → ∃𝑥𝑦(𝑥 = 𝐴𝑦 = 𝐵))
10 elisset 2819 . . . . . . . 8 (𝐶𝑅 → ∃𝑧 𝑧 = 𝐶)
11 elisset 2819 . . . . . . . 8 (𝐷𝑆 → ∃𝑤 𝑤 = 𝐷)
1210, 11anim12i 616 . . . . . . 7 ((𝐶𝑅𝐷𝑆) → (∃𝑧 𝑧 = 𝐶 ∧ ∃𝑤 𝑤 = 𝐷))
13 exdistrv 1964 . . . . . . 7 (∃𝑧𝑤(𝑧 = 𝐶𝑤 = 𝐷) ↔ (∃𝑧 𝑧 = 𝐶 ∧ ∃𝑤 𝑤 = 𝐷))
1412, 13sylibr 237 . . . . . 6 ((𝐶𝑅𝐷𝑆) → ∃𝑧𝑤(𝑧 = 𝐶𝑤 = 𝐷))
159, 14anim12i 616 . . . . 5 (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → (∃𝑥𝑦(𝑥 = 𝐴𝑦 = 𝐵) ∧ ∃𝑧𝑤(𝑧 = 𝐶𝑤 = 𝐷)))
16 excom 2166 . . . . . . 7 (∃𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ↔ ∃𝑧𝑦𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)))
1716exbii 1855 . . . . . 6 (∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ↔ ∃𝑥𝑧𝑦𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)))
18 4exdistrv 1965 . . . . . 6 (∃𝑥𝑧𝑦𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ↔ (∃𝑥𝑦(𝑥 = 𝐴𝑦 = 𝐵) ∧ ∃𝑧𝑤(𝑧 = 𝐶𝑤 = 𝐷)))
1917, 18bitri 278 . . . . 5 (∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ↔ (∃𝑥𝑦(𝑥 = 𝐴𝑦 = 𝐵) ∧ ∃𝑧𝑤(𝑧 = 𝐶𝑤 = 𝐷)))
2015, 19sylibr 237 . . . 4 (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → ∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)))
21 cgsex4gOLD.1 . . . . . 6 (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) → 𝜒)
22212eximi 1843 . . . . 5 (∃𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) → ∃𝑧𝑤𝜒)
23222eximi 1843 . . . 4 (∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) → ∃𝑥𝑦𝑧𝑤𝜒)
2420, 23syl 17 . . 3 (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → ∃𝑥𝑦𝑧𝑤𝜒)
251biimprcd 253 . . . . . 6 (𝜓 → (𝜒𝜑))
2625ancld 554 . . . . 5 (𝜓 → (𝜒 → (𝜒𝜑)))
27262eximdv 1927 . . . 4 (𝜓 → (∃𝑧𝑤𝜒 → ∃𝑧𝑤(𝜒𝜑)))
28272eximdv 1927 . . 3 (𝜓 → (∃𝑥𝑦𝑧𝑤𝜒 → ∃𝑥𝑦𝑧𝑤(𝜒𝜑)))
2924, 28syl5com 31 . 2 (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → (𝜓 → ∃𝑥𝑦𝑧𝑤(𝜒𝜑)))
304, 29impbid2 229 1 (((𝐴𝑅𝐵𝑆) ∧ (𝐶𝑅𝐷𝑆)) → (∃𝑥𝑦𝑧𝑤(𝜒𝜑) ↔ 𝜓))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1543  wex 1787  wcel 2110
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-11 2158
This theorem depends on definitions:  df-bi 210  df-an 400  df-tru 1546  df-ex 1788  df-sb 2071  df-clab 2715  df-clel 2816
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator