Theorem sbcrext 2981

Description: Interchange class substitution and restricted existential quantifier. (Contributed by NM, 1-Mar-2008.) (Proof shortened by Mario Carneiro, 13-Oct-2016.)

Assertion

Ref	Expression
sbcrext	⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))

Distinct variable groups:   𝑥,𝑦   𝑥,𝐵

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐴(𝑥,𝑦)   𝐵(𝑦)

Proof of Theorem sbcrext

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		sbcex 2912	. . 3 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V)
2	1	a1i 9	. 2 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V))
3		nfnfc1 2282	. . 3 ⊢ Ⅎ𝑦Ⅎ𝑦𝐴
4		id 19	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝐴)
5		nfcvd 2280	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦V)
6	4, 5	nfeld 2295	. . 3 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝐴 ∈ V)
7		sbcex 2912	. . . 4 ⊢ ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)
8	7	2a1i 27	. . 3 ⊢ (Ⅎ𝑦𝐴 → (𝑦 ∈ 𝐵 → ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)))
9	3, 6, 8	rexlimd2 2545	. 2 ⊢ (Ⅎ𝑦𝐴 → (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 → 𝐴 ∈ V))
10		sbcco 2925	. . . 4 ⊢ ([𝐴 / 𝑧][𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑)
11		simpl 108	. . . . 5 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → 𝐴 ∈ V)
12		sbsbc 2908	. . . . . . 7 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑)
13		nfcv 2279	. . . . . . . . 9 ⊢ Ⅎ𝑥𝐵
14		nfs1v 1910	. . . . . . . . 9 ⊢ Ⅎ𝑥[𝑧 / 𝑥]𝜑
15	13, 14	nfrexxy 2470	. . . . . . . 8 ⊢ Ⅎ𝑥∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑
16		sbequ12 1744	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑥]𝜑))
17	16	rexbidv 2436	. . . . . . . 8 ⊢ (𝑥 = 𝑧 → (∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑))
18	15, 17	sbie 1764	. . . . . . 7 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑)
19	12, 18	bitr3i 185	. . . . . 6 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑)
20		nfcvd 2280	. . . . . . . . . 10 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝑧)
21	20, 4	nfeqd 2294	. . . . . . . . 9 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝑧 = 𝐴)
22	3, 21	nfan1 1543	. . . . . . . 8 ⊢ Ⅎ𝑦(Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴)
23		dfsbcq2 2907	. . . . . . . . 9 ⊢ (𝑧 = 𝐴 → ([𝑧 / 𝑥]𝜑 ↔ [𝐴 / 𝑥]𝜑))
24	23	adantl 275	. . . . . . . 8 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴) → ([𝑧 / 𝑥]𝜑 ↔ [𝐴 / 𝑥]𝜑))
25	22, 24	rexbid 2434	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴) → (∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
26	25	adantll 467	. . . . . 6 ⊢ (((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) ∧ 𝑧 = 𝐴) → (∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
27	19, 26	syl5bb 191	. . . . 5 ⊢ (((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) ∧ 𝑧 = 𝐴) → ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
28	11, 27	sbcied 2940	. . . 4 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑧][𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
29	10, 28	syl5bbr 193	. . 3 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
30	29	expcom 115	. 2 ⊢ (Ⅎ𝑦𝐴 → (𝐴 ∈ V → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)))
31	2, 9, 30	pm5.21ndd 694	1 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))

Syntax hints:   → wi 4   ∧ wa 103   ↔ wb 104   = wceq 1331   ∈ wcel 1480  [wsb 1735  Ⅎwnfc 2266  ∃wrex 2415  Vcvv 2681  [wsbc 2904

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2119

This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-nf 1437  df-sb 1736  df-clab 2124  df-cleq 2130  df-clel 2133  df-nfc 2268  df-ral 2419  df-rex 2420  df-v 2683  df-sbc 2905

This theorem is referenced by:  sbcrex  2983