Theorem elpwdifsn 4789

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 1138	. . . . . 6 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ⊆ 𝑉)
2	1	sselda 3983	. . . . 5 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ∈ 𝑉)
3		df-nel 3047	. . . . . . . . 9 ⊢ (𝐴 ∉ 𝑆 ↔ ¬ 𝐴 ∈ 𝑆)
4	3	biimpi 216	. . . . . . . 8 ⊢ (𝐴 ∉ 𝑆 → ¬ 𝐴 ∈ 𝑆)
5	4	3ad2ant3 1136	. . . . . . 7 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → ¬ 𝐴 ∈ 𝑆)
6	5	anim1ci 616	. . . . . 6 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → (𝑥 ∈ 𝑆 ∧ ¬ 𝐴 ∈ 𝑆))
7		nelne2 3040	. . . . . 6 ⊢ ((𝑥 ∈ 𝑆 ∧ ¬ 𝐴 ∈ 𝑆) → 𝑥 ≠ 𝐴)
8	6, 7	syl 17	. . . . 5 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ≠ 𝐴)
9		eldifsn 4786	. . . . 5 ⊢ (𝑥 ∈ (𝑉 ∖ {𝐴}) ↔ (𝑥 ∈ 𝑉 ∧ 𝑥 ≠ 𝐴))
10	2, 8, 9	sylanbrc 583	. . . 4 ⊢ (((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) ∧ 𝑥 ∈ 𝑆) → 𝑥 ∈ (𝑉 ∖ {𝐴}))
11	10	ex 412	. . 3 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → (𝑥 ∈ 𝑆 → 𝑥 ∈ (𝑉 ∖ {𝐴})))
12	11	ssrdv 3989	. 2 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ⊆ (𝑉 ∖ {𝐴}))
13		elpwg 4603	. . 3 ⊢ (𝑆 ∈ 𝑊 → (𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}) ↔ 𝑆 ⊆ (𝑉 ∖ {𝐴})))
14	13	3ad2ant1 1134	. 2 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → (𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}) ↔ 𝑆 ⊆ (𝑉 ∖ {𝐴})))
15	12, 14	mpbird 257	1 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑆 ⊆ 𝑉 ∧ 𝐴 ∉ 𝑆) → 𝑆 ∈ 𝒫 (𝑉 ∖ {𝐴}))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   ∈ wcel 2108   ≠ wne 2940   ∉ wnel 3046   ∖ cdif 3948   ⊆ wss 3951  𝒫 cpw 4600  {csn 4626

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-ext 2708

This theorem depends on definitions:  df-bi 207  df-an 396  df-3an 1089  df-tru 1543  df-ex 1780  df-sb 2065  df-clab 2715  df-cleq 2729  df-clel 2816  df-ne 2941  df-nel 3047  df-v 3482  df-dif 3954  df-ss 3968  df-pw 4602  df-sn 4627

This theorem is referenced by:  uhgrspan1  29320  upgrreslem  29321  umgrreslem  29322  umgrres1lem  29327  upgrres1  29330