Theorem elpwdifsn 4722

Description: A subset of a set is an element of the power set of the difference of the set with a singleton if the subset does not contain the singleton element. (Contributed by AV, 10-Jan-2020.)

Assertion

Ref	Expression
elpwdifsn	⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}))

Proof of Theorem elpwdifsn

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp2 1136	. . . . . 6 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ⊆ 𝑉)
2	1	sselda 3921	. . . . 5 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ∈ 𝑉)
3		df-nel 3050	. . . . . . . . 9 ⊢ (𝐴 ∉ 𝑆 ↔ ¬ 𝐴 ∈ 𝑆)
4	3	biimpi 215	. . . . . . . 8 ⊢ (𝐴 ∉ 𝑆 → ¬ 𝐴 ∈ 𝑆)
5	4	3ad2ant3 1134	. . . . . . 7 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → ¬ 𝐴 ∈ 𝑆)
6	5	anim1ci 616	. . . . . 6 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → (𝑥 ∈ 𝑆 ∧ ¬ 𝐴 ∈ 𝑆))
7		nelne2 3042	. . . . . 6 ⊢ ((𝑥 ∈ 𝑆 ∧ ¬ 𝐴 ∈ 𝑆) → 𝑥 ≠ 𝐴)
8	6, 7	syl 17	. . . . 5 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ≠ 𝐴)
9		eldifsn 4720	. . . . 5 ⊢ (𝑥 ∈ (𝑉 ∖ {𝐴}) ↔ (𝑥 ∈ 𝑉 ∧ 𝑥 ≠ 𝐴))
10	2, 8, 9	sylanbrc 583	. . . 4 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ∈ (𝑉 ∖ {𝐴}))
11	10	ex 413	. . 3 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → (𝑥 ∈ 𝑆 → 𝑥 ∈ (𝑉 ∖ {𝐴})))
12	11	ssrdv 3927	. 2 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ⊆ (𝑉 ∖ {𝐴}))
13		elpwg 4536	. . 3 ⊢ (𝑆 ∈ 𝑊 → (𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}) ↔ 𝑆 ⊆ (𝑉 ∖ {𝐴})))
14	13	3ad2ant1 1132	. 2 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → (𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}) ↔ 𝑆 ⊆ (𝑉 ∖ {𝐴})))
15	12, 14	mpbird 256	1 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1086   ∈ wcel 2106   ≠ wne 2943   ∉ wnel 3049   ∖ cdif 3884   ⊆ wss 3887  𝒫 cpw 4533  {csn 4561

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-ext 2709

This theorem depends on definitions:  df-bi 206  df-an 397  df-3an 1088  df-tru 1542  df-ex 1783  df-sb 2068  df-clab 2716  df-cleq 2730  df-clel 2816  df-ne 2944  df-nel 3050  df-v 3434  df-dif 3890  df-in 3894  df-ss 3904  df-pw 4535  df-sn 4562

This theorem is referenced by:  uhgrspan1  27670  upgrreslem  27671  umgrreslem  27672  umgrres1lem  27677  upgrres1  27680