Theorem ralxpxfr2d 3576

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 3069	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑥(𝑥 ∈ 𝐵 → 𝜓))
2		ralxpxfr2d.b	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐵 ↔ ∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴))
3	2	imbi1d 342	. . . . 5 ⊢ (𝜑 → ((𝑥 ∈ 𝐵 → 𝜓) ↔ (∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
4	3	albidv 1923	. . . 4 ⊢ (𝜑 → (∀𝑥(𝑥 ∈ 𝐵 → 𝜓) ↔ ∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
5	1, 4	bitrid 282	. . 3 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓)))
6		ralcom4 3164	. . . 4 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
7		ralcom4 3164	. . . . 5 ⊢ (∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
8	7	ralbii 3092	. . . 4 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑥∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
9		r19.23v 3208	. . . . . . 7 ⊢ (∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
10	9	ralbii 3092	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
11		r19.23v 3208	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐶 (∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ (∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓))
12	10, 11	bitr2i 275	. . . . 5 ⊢ ((∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
13	12	albii 1822	. . . 4 ⊢ (∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 (𝑥 = 𝐴 → 𝜓))
14	6, 8, 13	3bitr4ri 304	. . 3 ⊢ (∀𝑥(∃𝑦 ∈ 𝐶 ∃𝑧 ∈ 𝐷 𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓))
15	5, 14	bitrdi 287	. 2 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓)))
16		ralxpxfr2d.c	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → (𝜓 ↔ 𝜒))
17	16	pm5.74da 801	. . . . 5 ⊢ (𝜑 → ((𝑥 = 𝐴 → 𝜓) ↔ (𝑥 = 𝐴 → 𝜒)))
18	17	albidv 1923	. . . 4 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑥(𝑥 = 𝐴 → 𝜒)))
19		ralxpxfr2d.a	. . . . 5 ⊢ 𝐴 ∈ V
20		biidd 261	. . . . 5 ⊢ (𝑥 = 𝐴 → (𝜒 ↔ 𝜒))
21	19, 20	ceqsalv 3467	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → 𝜒) ↔ 𝜒)
22	18, 21	bitrdi 287	. . 3 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ 𝜒))
23	22	2ralbidv 3129	. 2 ⊢ (𝜑 → (∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 ∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 𝜒))
24	15, 23	bitrd 278	1 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 𝜓 ↔ ∀𝑦 ∈ 𝐶 ∀𝑧 ∈ 𝐷 𝜒))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396  ∀wal 1537   = wceq 1539   ∈ wcel 2106  ∀wral 3064  ∃wrex 3065  Vcvv 3432

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-11 2154

This theorem depends on definitions:  df-bi 206  df-an 397  df-ex 1783  df-clel 2816  df-ral 3069  df-rex 3070

This theorem is referenced by:  ralxpmap  8684