Theorem ralxpxfr2d 3568

Description: Transfer a universal quantifier between one variable with pair-like semantics and two. (Contributed by Stefan O'Rear, 27-Feb-2015.)

Hypotheses

Ref	Expression
ralxpxfr2d.a	⊢ 𝐴 ∈ V
ralxpxfr2d.b	⊢ (𝜑 → (𝑥 ∈ 𝐵 ↔ ∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴))
ralxpxfr2d.c	⊢ ((𝜑 ∧ 𝑥 = 𝐴) → (𝜓 ↔ 𝜒))

Assertion

Ref	Expression
ralxpxfr2d	⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 𝜒))

Distinct variable groups:   𝜑,𝑥,𝑧   𝜑,𝑦,𝑥   𝜓,𝑦   𝜓,𝑧   𝑥,𝐴   𝑥,𝐶   𝑥,𝐷   𝜒,𝑥

Allowed substitution hints:   𝜓(𝑥)   𝜒(𝑦,𝑧)   𝐴(𝑦,𝑧)   𝐵(𝑥,𝑦,𝑧)   𝐶(𝑦,𝑧)   𝐷(𝑦,𝑧)

Proof of Theorem ralxpxfr2d

Step	Hyp	Ref	Expression
1		df-ral 3068	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑥(𝑥 ∈ 𝐵 → 𝜓))
2		ralxpxfr2d.b	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐵 ↔ ∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴))
3	2	imbi1d 341	. . . . 5 ⊢ (𝜑 → ((𝑥 ∈ 𝐵 → 𝜓) ↔ (∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
4	3	albidv 1924	. . . 4 ⊢ (𝜑 → (∀𝑥(𝑥 ∈ 𝐵 → 𝜓) ↔ ∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
5	1, 4	syl5bb 282	. . 3 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
6		ralcom4 3161	. . . 4 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
7		ralcom4 3161	. . . . 5 ⊢ (∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
8	7	ralbii 3090	. . . 4 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
9		r19.23v 3207	. . . . . . 7 ⊢ (∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
10	9	ralbii 3090	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
11		r19.23v 3207	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐶 (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ (∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
12	10, 11	bitr2i 275	. . . . 5 ⊢ ((∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
13	12	albii 1823	. . . 4 ⊢ (∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
14	6, 8, 13	3bitr4ri 303	. . 3 ⊢ (∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓))
15	5, 14	bitrdi 286	. 2 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓)))
16		ralxpxfr2d.c	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → (𝜓 ↔ 𝜒))
17	16	pm5.74da 800	. . . . 5 ⊢ (𝜑 → ((𝑥 = 𝐴 → 𝜓) ↔ (𝑥 = 𝐴 → 𝜒)))
18	17	albidv 1924	. . . 4 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥(𝑥 = 𝐴 → 𝜒)))
19		ralxpxfr2d.a	. . . . 5 ⊢ 𝐴 ∈ V
20		biidd 261	. . . . 5 ⊢ (𝑥 = 𝐴 → (𝜒 ↔ 𝜒))
21	19, 20	ceqsalv 3457	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → 𝜒) ↔ 𝜒)
22	18, 21	bitrdi 286	. . 3 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ 𝜒))
23	22	2ralbidv 3122	. 2 ⊢ (𝜑 → (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 𝜒))
24	15, 23	bitrd 278	1 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 𝜒))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 395  ∀wal 1537   = wceq 1539   ∈ wcel 2108  ∀wral 3063  ∃wrex 3064  Vcvv 3422

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-11 2156

This theorem depends on definitions:  df-bi 206  df-an 396  df-ex 1784  df-clel 2817  df-ral 3068  df-rex 3069

This theorem is referenced by:  ralxpmap  8642