Theorem rspct 3607

Description: A closed version of rspc 3609. (Contributed by Andrew Salmon, 6-Jun-2011.)

Hypothesis

Ref	Expression
rspct.1	⊢ Ⅎ𝑥𝜓

Assertion

Ref	Expression
rspct	⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵

Allowed substitution hints:   𝜑(𝑥)   𝜓(𝑥)

Proof of Theorem rspct

Step	Hyp	Ref	Expression
1		df-ral 3059	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 𝜑 ↔ ∀𝑥(𝑥 ∈ 𝐵 → 𝜑))
2		eleq1 2826	. . . . . . . . . 10 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝐵 ↔ 𝐴 ∈ 𝐵))
3	2	adantr 480	. . . . . . . . 9 ⊢ ((𝑥 = 𝐴 ∧ (𝜑 ↔ 𝜓)) → (𝑥 ∈ 𝐵 ↔ 𝐴 ∈ 𝐵))
4		simpr 484	. . . . . . . . 9 ⊢ ((𝑥 = 𝐴 ∧ (𝜑 ↔ 𝜓)) → (𝜑 ↔ 𝜓))
5	3, 4	imbi12d 344	. . . . . . . 8 ⊢ ((𝑥 = 𝐴 ∧ (𝜑 ↔ 𝜓)) → ((𝑥 ∈ 𝐵 → 𝜑) ↔ (𝐴 ∈ 𝐵 → 𝜓)))
6	5	ex 412	. . . . . . 7 ⊢ (𝑥 = 𝐴 → ((𝜑 ↔ 𝜓) → ((𝑥 ∈ 𝐵 → 𝜑) ↔ (𝐴 ∈ 𝐵 → 𝜓))))
7	6	a2i 14	. . . . . 6 ⊢ ((𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → 𝜑) ↔ (𝐴 ∈ 𝐵 → 𝜓))))
8	7	alimi 1807	. . . . 5 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → ∀𝑥(𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → 𝜑) ↔ (𝐴 ∈ 𝐵 → 𝜓))))
9		nfv 1911	. . . . . . 7 ⊢ Ⅎ𝑥 𝐴 ∈ 𝐵
10		rspct.1	. . . . . . 7 ⊢ Ⅎ𝑥𝜓
11	9, 10	nfim 1893	. . . . . 6 ⊢ Ⅎ𝑥(𝐴 ∈ 𝐵 → 𝜓)
12		nfcv 2902	. . . . . 6 ⊢ Ⅎ𝑥𝐴
13	11, 12	spcgft 3548	. . . . 5 ⊢ (∀𝑥(𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → 𝜑) ↔ (𝐴 ∈ 𝐵 → 𝜓))) → (𝐴 ∈ 𝐵 → (∀𝑥(𝑥 ∈ 𝐵 → 𝜑) → (𝐴 ∈ 𝐵 → 𝜓))))
14	8, 13	syl 17	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝐴 ∈ 𝐵 → (∀𝑥(𝑥 ∈ 𝐵 → 𝜑) → (𝐴 ∈ 𝐵 → 𝜓))))
15	1, 14	syl7bi 255	. . 3 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → (𝐴 ∈ 𝐵 → 𝜓))))
16	15	com34 91	. 2 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝐴 ∈ 𝐵 → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓))))
17	16	pm2.43d 53	1 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395  ∀wal 1534   = wceq 1536  Ⅎwnf 1779   ∈ wcel 2105  ∀wral 3058

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-10 2138  ax-11 2154  ax-12 2174  ax-ext 2705

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-ex 1776  df-nf 1780  df-cleq 2726  df-clel 2813  df-nfc 2889  df-ral 3059

This theorem is referenced by:  rspcdf  3608