Theorem sbcrext 3076

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 3007	. . 3 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V)
2	1	a1i 9	. 2 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V))
3		nfnfc1 2351	. . 3 ⊢ Ⅎ𝑦Ⅎ𝑦𝐴
4		id 19	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝐴)
5		nfcvd 2349	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦V)
6	4, 5	nfeld 2364	. . 3 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝐴 ∈ V)
7		sbcex 3007	. . . 4 ⊢ ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)
8	7	2a1i 27	. . 3 ⊢ (Ⅎ𝑦𝐴 → (𝑦 ∈ 𝐵 → ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)))
9	3, 6, 8	rexlimd2 2621	. 2 ⊢ (Ⅎ𝑦𝐴 → (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 → 𝐴 ∈ V))
10		sbcco 3020	. . . 4 ⊢ ([𝐴 / 𝑧][𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑)
11		simpl 109	. . . . 5 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → 𝐴 ∈ V)
12		sbsbc 3002	. . . . . . 7 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑)
13		nfcv 2348	. . . . . . . . 9 ⊢ Ⅎ𝑥𝐵
14		nfs1v 1967	. . . . . . . . 9 ⊢ Ⅎ𝑥[𝑧 / 𝑥]𝜑
15	13, 14	nfrexw 2545	. . . . . . . 8 ⊢ Ⅎ𝑥∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑
16		sbequ12 1794	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑥]𝜑))
17	16	rexbidv 2507	. . . . . . . 8 ⊢ (𝑥 = 𝑧 → (∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑))
18	15, 17	sbie 1814	. . . . . . 7 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑)
19	12, 18	bitr3i 186	. . . . . 6 ⊢ ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑)
20		nfcvd 2349	. . . . . . . . . 10 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝑧)
21	20, 4	nfeqd 2363	. . . . . . . . 9 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝑧 = 𝐴)
22	3, 21	nfan1 1587	. . . . . . . 8 ⊢ Ⅎ𝑦(Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴)
23		dfsbcq2 3001	. . . . . . . . 9 ⊢ (𝑧 = 𝐴 → ([𝑧 / 𝑥]𝜑 ↔ [𝐴 / 𝑥]𝜑))
24	23	adantl 277	. . . . . . . 8 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴) → ([𝑧 / 𝑥]𝜑 ↔ [𝐴 / 𝑥]𝜑))
25	22, 24	rexbid 2505	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝑧 = 𝐴) → (∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
26	25	adantll 476	. . . . . 6 ⊢ (((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) ∧ 𝑧 = 𝐴) → (∃𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
27	19, 26	bitrid 192	. . . . 5 ⊢ (((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) ∧ 𝑧 = 𝐴) → ([𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
28	11, 27	sbcied 3035	. . . 4 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑧][𝑧 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
29	10, 28	bitr3id 194	. . 3 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
30	29	expcom 116	. 2 ⊢ (Ⅎ𝑦𝐴 → (𝐴 ∈ V → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)))
31	2, 9, 30	pm5.21ndd 707	1 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1373  [wsb 1785   ∈ wcel 2176  Ⅎwnfc 2335  ∃wrex 2485  Vcvv 2772  [wsbc 2998

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-ext 2187

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-nf 1484  df-sb 1786  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ral 2489  df-rex 2490  df-v 2774  df-sbc 2999

This theorem is referenced by:  sbcrex  3078