Theorem sbcrext 3819

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 3748	. . 3 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V)
2	1	a1i 11	. 2 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 → 𝐴 ∈ V))
3		nfnfc1 2925	. . 3 ⊢ Ⅎ𝑦Ⅎ𝑦𝐴
4		id 23	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦𝐴)
5		nfcvd 2923	. . . 4 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦V)
6	4, 5	nfeld 2933	. . 3 ⊢ (Ⅎ𝑦𝐴 → Ⅎ𝑦 𝐴 ∈ V)
7		sbcex 3748	. . . 4 ⊢ ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)
8	7	2a1i 12	. . 3 ⊢ (Ⅎ𝑦𝐴 → (𝑦 ∈ 𝐵 → ([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V)))
9	3, 6, 8	rexlimd2 3268	. 2 ⊢ (Ⅎ𝑦𝐴 → (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 → 𝐴 ∈ V))
10		sbcng 3785	. . . . . 6 ⊢ (𝐴 ∈ V → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑))
11	10	adantl 487	. . . . 5 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑))
12		sbcralt 3818	. . . . . . . 8 ⊢ ((𝐴 ∈ V ∧ Ⅎ𝑦𝐴) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑))
13	12	ancoms 464	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑))
14	3, 6	nfan1 2236	. . . . . . . 8 ⊢ Ⅎ𝑦(Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V)
15		sbcng 3785	. . . . . . . . 9 ⊢ (𝐴 ∈ V → ([𝐴 / 𝑥] ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]𝜑))
16	15	adantl 487	. . . . . . . 8 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ 𝜑 ↔ ¬ [𝐴 / 𝑥]𝜑))
17	14, 16	ralbid 3275	. . . . . . 7 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → (∀𝑦 ∈ 𝐵 [𝐴 / 𝑥] ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
18	13, 17	bitrd 282	. . . . . 6 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
19	18	notbid 321	. . . . 5 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → (¬ [𝐴 / 𝑥]∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
20	11, 19	bitrd 282	. . . 4 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑))
21		dfrex2 3089	. . . . 5 ⊢ (∃𝑦 ∈ 𝐵 𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑)
22	21	sbcbii 3794	. . . 4 ⊢ ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ [𝐴 / 𝑥] ¬ ∀𝑦 ∈ 𝐵 ¬ 𝜑)
23		dfrex2 3089	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑 ↔ ¬ ∀𝑦 ∈ 𝐵 ¬ [𝐴 / 𝑥]𝜑)
24	20, 22, 23	3bitr4g 317	. . 3 ⊢ ((Ⅎ𝑦𝐴 ∧ 𝐴 ∈ V) → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))
25	24	ex 418	. 2 ⊢ (Ⅎ𝑦𝐴 → (𝐴 ∈ V → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)))
26	2, 9, 25	pm5.21ndd 382	1 ⊢ (Ⅎ𝑦𝐴 → ([𝐴 / 𝑥]∃𝑦 ∈ 𝐵 𝜑 ↔ ∃𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∈ wcel 2144  Ⅎwnfc 2907  ∀wral 3076  ∃wrex 3086  Vcvv 3450  [wsbc 3738

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-tru 1572  df-ex 1812  df-nf 1816  df-sb 2099  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ral 3077  df-rex 3087  df-v 3452  df-sbc 3739

This theorem is used by:  sbcrex  3821