Theorem bj-rspgt 13667

Description: Restricted specialization, generalized. Weakens a hypothesis of rspccv 2827 and seems to have a shorter proof. (Contributed by BJ, 21-Nov-2019.)

Hypotheses

Ref	Expression
bj-rspg.nfa	⊢ Ⅎ𝑥𝐴
bj-rspg.nfb	⊢ Ⅎ𝑥𝐵
bj-rspg.nf2	⊢ Ⅎ𝑥𝜓

Assertion

Ref	Expression
bj-rspgt	⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 → 𝜓)) → (∀𝑥 ∈ 𝐵 𝜑 → (𝐴 ∈ 𝐵 → 𝜓)))

Proof of Theorem bj-rspgt

Step	Hyp	Ref	Expression
1		eleq1 2229	. . . . . . . . 9 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝐵 ↔ 𝐴 ∈ 𝐵))
2	1	imbi1d 230	. . . . . . . 8 ⊢ (𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) ↔ (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑))))
3	2	biimpd 143	. . . . . . 7 ⊢ (𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑))))
4		imim2 55	. . . . . . . 8 ⊢ ((𝜑 → 𝜓) → ((∀𝑥 ∈ 𝐵 𝜑 → 𝜑) → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))
5	4	imim2d 54	. . . . . . 7 ⊢ ((𝜑 → 𝜓) → ((𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓))))
6	3, 5	syl9 72	. . . . . 6 ⊢ (𝑥 = 𝐴 → ((𝜑 → 𝜓) → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))))
7	6	a2i 11	. . . . 5 ⊢ ((𝑥 = 𝐴 → (𝜑 → 𝜓)) → (𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))))
8	7	alimi 1443	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 → 𝜓)) → ∀𝑥(𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))))
9		bj-rspg.nfa	. . . . 5 ⊢ Ⅎ𝑥𝐴
10		bj-rspg.nfb	. . . . . . 7 ⊢ Ⅎ𝑥𝐵
11	9, 10	nfel 2317	. . . . . 6 ⊢ Ⅎ𝑥 𝐴 ∈ 𝐵
12		nfra1 2497	. . . . . . 7 ⊢ Ⅎ𝑥∀𝑥 ∈ 𝐵 𝜑
13		bj-rspg.nf2	. . . . . . 7 ⊢ Ⅎ𝑥𝜓
14	12, 13	nfim 1560	. . . . . 6 ⊢ Ⅎ𝑥(∀𝑥 ∈ 𝐵 𝜑 → 𝜓)
15	11, 14	nfim 1560	. . . . 5 ⊢ Ⅎ𝑥(𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓))
16		rsp 2513	. . . . . . 7 ⊢ (∀𝑥 ∈ 𝐵 𝜑 → (𝑥 ∈ 𝐵 → 𝜑))
17	16	a1i 9	. . . . . 6 ⊢ (𝑥 = 𝐴 → (∀𝑥 ∈ 𝐵 𝜑 → (𝑥 ∈ 𝐵 → 𝜑)))
18	17	com23 78	. . . . 5 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)))
19	9, 15, 18	bj-vtoclgft 13656	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → ((𝑥 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜑)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))) → (𝐴 ∈ 𝐵 → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓))))
20	8, 19	syl 14	. . 3 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 → 𝜓)) → (𝐴 ∈ 𝐵 → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓))))
21	20	pm2.43d 50	. 2 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 → 𝜓)) → (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 𝜑 → 𝜓)))
22	21	com23 78	1 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 → 𝜓)) → (∀𝑥 ∈ 𝐵 𝜑 → (𝐴 ∈ 𝐵 → 𝜓)))

Syntax hints:   → wi 4  ∀wal 1341   = wceq 1343  Ⅎwnf 1448   ∈ wcel 2136  Ⅎwnfc 2295  ∀wral 2444

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 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-ext 2147

This theorem depends on definitions:  df-bi 116  df-tru 1346  df-nf 1449  df-sb 1751  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ral 2449  df-v 2728

This theorem is referenced by:  bj-rspg  13668