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

Theorem ceqsex8v 3509
Description: Elimination of eight existential quantifiers, using implicit substitution. (Contributed by NM, 23-Sep-2011.)
Hypotheses
Ref Expression
ceqsex8v.1 𝐴 ∈ V
ceqsex8v.2 𝐵 ∈ V
ceqsex8v.3 𝐶 ∈ V
ceqsex8v.4 𝐷 ∈ V
ceqsex8v.5 𝐸 ∈ V
ceqsex8v.6 𝐹 ∈ V
ceqsex8v.7 𝐺 ∈ V
ceqsex8v.8 𝐻 ∈ V
ceqsex8v.9 (𝑥 = 𝐴 → (𝜑𝜓))
ceqsex8v.10 (𝑦 = 𝐵 → (𝜓𝜒))
ceqsex8v.11 (𝑧 = 𝐶 → (𝜒𝜃))
ceqsex8v.12 (𝑤 = 𝐷 → (𝜃𝜏))
ceqsex8v.13 (𝑣 = 𝐸 → (𝜏𝜂))
ceqsex8v.14 (𝑢 = 𝐹 → (𝜂𝜁))
ceqsex8v.15 (𝑡 = 𝐺 → (𝜁𝜎))
ceqsex8v.16 (𝑠 = 𝐻 → (𝜎𝜌))
Assertion
Ref Expression
ceqsex8v (∃𝑥𝑦𝑧𝑤𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ 𝜌)
Distinct variable groups:   𝑥,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠,𝐴   𝑥,𝐵,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐶,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐷,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐸,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐹,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐺,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝑥,𝐻,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,𝑠   𝜓,𝑥   𝜒,𝑦   𝜃,𝑧   𝜏,𝑤   𝜂,𝑣   𝜁,𝑢   𝜎,𝑡   𝜌,𝑠
Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧, 𝑤, 𝑣, 𝑢, 𝑡, 𝑠)   𝜓(𝑦, 𝑧, 𝑤, 𝑣, 𝑢, 𝑡, 𝑠)   𝜒(𝑥, 𝑧, 𝑤, 𝑣, 𝑢, 𝑡, 𝑠)   𝜃(𝑥, 𝑦, 𝑤, 𝑣, 𝑢, 𝑡, 𝑠)   𝜏(𝑥, 𝑦, 𝑧, 𝑣, 𝑢, 𝑡, 𝑠)   𝜂(𝑥, 𝑦, 𝑧, 𝑤, 𝑢, 𝑡, 𝑠)   𝜁(𝑥, 𝑦, 𝑧, 𝑤, 𝑣, 𝑡, 𝑠)   𝜎(𝑥, 𝑦, 𝑧, 𝑤, 𝑣, 𝑢, 𝑠)   𝜌(𝑥, 𝑦, 𝑧, 𝑤, 𝑣, 𝑢, 𝑡)

Proof of Theorem ceqsex8v
StepHypRef Expression
1 19.42vv 1986 . . . . . . 7 (∃𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
212exbii 1878 . . . . . 6 (∃𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ ∃𝑣𝑢(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
3 19.42vv 1986 . . . . . 6 (∃𝑣𝑢(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
42, 3bitri 278 . . . . 5 (∃𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
5 3anass 1110 . . . . . . . 8 ((((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑)))
6 df-3an 1104 . . . . . . . . 9 (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑) ↔ (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑))
76anbi2i 634 . . . . . . . 8 ((((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑)))
85, 7bitr4i 281 . . . . . . 7 ((((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
982exbii 1878 . . . . . 6 (∃𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ ∃𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
1092exbii 1878 . . . . 5 (∃𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ ∃𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
11 df-3an 1104 . . . . 5 (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ (((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
124, 10, 113bitr4i 306 . . . 4 (∃𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ ((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
13122exbii 1878 . . 3 (∃𝑧𝑤𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ ∃𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
14132exbii 1878 . 2 (∃𝑥𝑦𝑧𝑤𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ ∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)))
15 ceqsex8v.1 . . 3 𝐴 ∈ V
16 ceqsex8v.2 . . 3 𝐵 ∈ V
17 ceqsex8v.3 . . 3 𝐶 ∈ V
18 ceqsex8v.4 . . 3 𝐷 ∈ V
19 ceqsex8v.9 . . . . 5 (𝑥 = 𝐴 → (𝜑𝜓))
20193anbi3d 1469 . . . 4 (𝑥 = 𝐴 → (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑) ↔ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜓)))
21204exbidv 1955 . . 3 (𝑥 = 𝐴 → (∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑) ↔ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜓)))
22 ceqsex8v.10 . . . . 5 (𝑦 = 𝐵 → (𝜓𝜒))
23223anbi3d 1469 . . . 4 (𝑦 = 𝐵 → (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜓) ↔ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜒)))
24234exbidv 1955 . . 3 (𝑦 = 𝐵 → (∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜓) ↔ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜒)))
25 ceqsex8v.11 . . . . 5 (𝑧 = 𝐶 → (𝜒𝜃))
26253anbi3d 1469 . . . 4 (𝑧 = 𝐶 → (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜒) ↔ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜃)))
27264exbidv 1955 . . 3 (𝑧 = 𝐶 → (∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜒) ↔ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜃)))
28 ceqsex8v.12 . . . . 5 (𝑤 = 𝐷 → (𝜃𝜏))
29283anbi3d 1469 . . . 4 (𝑤 = 𝐷 → (((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜃) ↔ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜏)))
30294exbidv 1955 . . 3 (𝑤 = 𝐷 → (∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜃) ↔ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜏)))
3115, 16, 17, 18, 21, 24, 27, 30ceqsex4v 3507 . 2 (∃𝑥𝑦𝑧𝑤((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷) ∧ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜑)) ↔ ∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜏))
32 ceqsex8v.5 . . 3 𝐸 ∈ V
33 ceqsex8v.6 . . 3 𝐹 ∈ V
34 ceqsex8v.7 . . 3 𝐺 ∈ V
35 ceqsex8v.8 . . 3 𝐻 ∈ V
36 ceqsex8v.13 . . 3 (𝑣 = 𝐸 → (𝜏𝜂))
37 ceqsex8v.14 . . 3 (𝑢 = 𝐹 → (𝜂𝜁))
38 ceqsex8v.15 . . 3 (𝑡 = 𝐺 → (𝜁𝜎))
39 ceqsex8v.16 . . 3 (𝑠 = 𝐻 → (𝜎𝜌))
4032, 33, 34, 35, 36, 37, 38, 39ceqsex4v 3507 . 2 (∃𝑣𝑢𝑡𝑠((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻) ∧ 𝜏) ↔ 𝜌)
4114, 31, 403bitri 300 1 (∃𝑥𝑦𝑧𝑤𝑣𝑢𝑡𝑠(((𝑥 = 𝐴𝑦 = 𝐵) ∧ (𝑧 = 𝐶𝑤 = 𝐷)) ∧ ((𝑣 = 𝐸𝑢 = 𝐹) ∧ (𝑡 = 𝐺𝑠 = 𝐻)) ∧ 𝜑) ↔ 𝜌)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400  w3a 1102   = wceq 1569  wex 1808  wcel 2142  Vcvv 3454
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144
This proof depends on definitions:  df-bi 210  df-an 401  df-3an 1104  df-ex 1809  df-clel 2837
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator