Theorem sbcrext 3873

Description: Interchange class substitution and restricted existential quantifier. (Contributed by NM, 1-Mar-2008.) (Proof shortened by Mario Carneiro, 13-Oct-2016.) (Revised by NM, 18-Aug-2018.) (Proof shortened by JJ, 7-Jul-2021.)

Assertion

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

Distinct variable groups:   𝑥,𝑦   𝑥,𝐵

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

Proof of Theorem sbcrext

Step	Hyp	Ref	Expression
1		sbcex 3798	. . 3 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V)
2	1	a1i 11	. 2 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V))
3		nfnfc1 2908	. . 3 ⊢ Ⅎ𝑦Ⅎ𝑦𝐴
4		id 22	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝐴)
5		nfcvd 2906	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦V)
6	4, 5	nfeld 2917	. . 3 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝐴 ∈ V)
7		sbcex 3798	. . . 4 ⊢ ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)
8	7	2a1i 12	. . 3 ⊢ (Ⅎ𝑦𝐴 → (𝑦 ∈ 𝐵 → ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)))
9	3, 6, 8	rexlimd2 3265	. 2 ⊢ (Ⅎ𝑦𝐴 → (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 → 𝐴 ∈ V))
10		sbcng 3836	. . . . . 6 ⊢ (𝐴 ∈ V → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑))
11	10	adantl 481	. . . . 5 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑))
12		sbcralt 3872	. . . . . . . 8 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑))
13	12	ancoms 458	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑))
14	3, 6	nfan1 2200	. . . . . . . 8 ⊢ Ⅎ𝑦(Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V)
15		sbcng 3836	. . . . . . . . 9 ⊢ (𝐴 ∈ V → ([𝐴 / 𝑥] ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]𝜑))
16	15	adantl 481	. . . . . . . 8 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]𝜑))
17	14, 16	ralbid 3273	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → (∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
18	13, 17	bitrd 279	. . . . . 6 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
19	18	notbid 318	. . . . 5 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → (¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
20	11, 19	bitrd 279	. . . 4 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
21		dfrex2 3073	. . . . 5 ⊢ (∃𝑦 ∈ 𝐵 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑)
22	21	sbcbii 3846	. . . 4 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑)
23		dfrex2 3073	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑)
24	20, 22, 23	3bitr4g 314	. . 3 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
25	24	ex 412	. 2 ⊢ (Ⅎ𝑦𝐴 → (𝐴 ∈ V → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)))
26	2, 9, 25	pm5.21ndd 379	1 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∈ wcel 2108  Ⅎwnfc 2890  ∀wral 3061  ∃wrex 3070  Vcvv 3480  [wsbc 3788

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-tru 1543  df-ex 1780  df-nf 1784  df-sb 2065  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ral 3062  df-rex 3071  df-v 3482  df-sbc 3789

This theorem is referenced by:  sbcrex  3875