Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  prsal Structured version   Visualization version   GIF version

Theorem prsal 39214
Description: The pair of the empty set and the whole base is a sigma-algebra. (Contributed by Glauco Siliprandi, 17-Aug-2020.)
Assertion
Ref Expression
prsal (𝑋𝑉 → {∅, 𝑋} ∈ SAlg)

Proof of Theorem prsal
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 0ex 4718 . . . . 5 ∅ ∈ V
21prid1 4241 . . . 4 ∅ ∈ {∅, 𝑋}
32a1i 11 . . 3 (𝑋𝑉 → ∅ ∈ {∅, 𝑋})
41a1i 11 . . . . . . . . 9 (𝑋𝑉 → ∅ ∈ V)
5 id 22 . . . . . . . . 9 (𝑋𝑉𝑋𝑉)
6 uniprg 4386 . . . . . . . . 9 ((∅ ∈ V ∧ 𝑋𝑉) → {∅, 𝑋} = (∅ ∪ 𝑋))
74, 5, 6syl2anc 691 . . . . . . . 8 (𝑋𝑉 {∅, 𝑋} = (∅ ∪ 𝑋))
8 uncom 3719 . . . . . . . . . 10 (∅ ∪ 𝑋) = (𝑋 ∪ ∅)
9 un0 3919 . . . . . . . . . 10 (𝑋 ∪ ∅) = 𝑋
108, 9eqtri 2632 . . . . . . . . 9 (∅ ∪ 𝑋) = 𝑋
1110a1i 11 . . . . . . . 8 (𝑋𝑉 → (∅ ∪ 𝑋) = 𝑋)
12 eqidd 2611 . . . . . . . 8 (𝑋𝑉𝑋 = 𝑋)
137, 11, 123eqtrd 2648 . . . . . . 7 (𝑋𝑉 {∅, 𝑋} = 𝑋)
1413difeq1d 3689 . . . . . 6 (𝑋𝑉 → ( {∅, 𝑋} ∖ 𝑦) = (𝑋𝑦))
1514adantr 480 . . . . 5 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → ( {∅, 𝑋} ∖ 𝑦) = (𝑋𝑦))
16 difeq2 3684 . . . . . . . . . 10 (𝑦 = ∅ → (𝑋𝑦) = (𝑋 ∖ ∅))
1716adantl 481 . . . . . . . . 9 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) = (𝑋 ∖ ∅))
18 dif0 3904 . . . . . . . . . 10 (𝑋 ∖ ∅) = 𝑋
1918a1i 11 . . . . . . . . 9 ((𝑋𝑉𝑦 = ∅) → (𝑋 ∖ ∅) = 𝑋)
2017, 19eqtrd 2644 . . . . . . . 8 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) = 𝑋)
21 prid2g 4240 . . . . . . . . 9 (𝑋𝑉𝑋 ∈ {∅, 𝑋})
2221adantr 480 . . . . . . . 8 ((𝑋𝑉𝑦 = ∅) → 𝑋 ∈ {∅, 𝑋})
2320, 22eqeltrd 2688 . . . . . . 7 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
2423adantlr 747 . . . . . 6 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ 𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
25 simpll 786 . . . . . . 7 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → 𝑋𝑉)
26 simpl 472 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 ∈ {∅, 𝑋})
27 neqne 2790 . . . . . . . . . 10 𝑦 = ∅ → 𝑦 ≠ ∅)
2827adantl 481 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 ≠ ∅)
29 elprn1 38700 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ 𝑦 ≠ ∅) → 𝑦 = 𝑋)
3026, 28, 29syl2anc 691 . . . . . . . 8 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 = 𝑋)
3130adantll 746 . . . . . . 7 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → 𝑦 = 𝑋)
32 difeq2 3684 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑋𝑦) = (𝑋𝑋))
33 difid 3902 . . . . . . . . . . 11 (𝑋𝑋) = ∅
3433a1i 11 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑋𝑋) = ∅)
3532, 34eqtrd 2644 . . . . . . . . 9 (𝑦 = 𝑋 → (𝑋𝑦) = ∅)
362a1i 11 . . . . . . . . 9 (𝑦 = 𝑋 → ∅ ∈ {∅, 𝑋})
3735, 36eqeltrd 2688 . . . . . . . 8 (𝑦 = 𝑋 → (𝑋𝑦) ∈ {∅, 𝑋})
3837adantl 481 . . . . . . 7 ((𝑋𝑉𝑦 = 𝑋) → (𝑋𝑦) ∈ {∅, 𝑋})
3925, 31, 38syl2anc 691 . . . . . 6 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
4024, 39pm2.61dan 828 . . . . 5 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → (𝑋𝑦) ∈ {∅, 𝑋})
4115, 40eqeltrd 2688 . . . 4 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋})
4241ralrimiva 2949 . . 3 (𝑋𝑉 → ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋})
43 elpwi 4117 . . . . . . . . . . . . 13 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ⊆ {∅, 𝑋})
44 uniss 4394 . . . . . . . . . . . . 13 (𝑦 ⊆ {∅, 𝑋} → 𝑦 {∅, 𝑋})
4543, 44syl 17 . . . . . . . . . . . 12 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 {∅, 𝑋})
4645adantl 481 . . . . . . . . . . 11 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦 {∅, 𝑋})
4713adantr 480 . . . . . . . . . . 11 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → {∅, 𝑋} = 𝑋)
4846, 47sseqtrd 3604 . . . . . . . . . 10 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦𝑋)
4948adantr 480 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦𝑋)
50 elssuni 4403 . . . . . . . . . 10 (𝑋𝑦𝑋 𝑦)
5150adantl 481 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑋 𝑦)
5249, 51jca 553 . . . . . . . 8 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → ( 𝑦𝑋𝑋 𝑦))
53 eqss 3583 . . . . . . . 8 ( 𝑦 = 𝑋 ↔ ( 𝑦𝑋𝑋 𝑦))
5452, 53sylibr 223 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦 = 𝑋)
5521ad2antrr 758 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑋 ∈ {∅, 𝑋})
5654, 55eqeltrd 2688 . . . . . 6 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦 ∈ {∅, 𝑋})
57 id 22 . . . . . . . . . . . 12 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ∈ 𝒫 {∅, 𝑋})
58 pwpr 4368 . . . . . . . . . . . 12 𝒫 {∅, 𝑋} = ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}})
5957, 58syl6eleq 2698 . . . . . . . . . . 11 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
6059adantr 480 . . . . . . . . . 10 ((𝑦 ∈ 𝒫 {∅, 𝑋} ∧ ¬ 𝑋𝑦) → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
6160adantll 746 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
62 snidg 4153 . . . . . . . . . . . . . . . 16 (𝑋𝑉𝑋 ∈ {𝑋})
6362adantr 480 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {𝑋}) → 𝑋 ∈ {𝑋})
64 id 22 . . . . . . . . . . . . . . . . 17 (𝑦 = {𝑋} → 𝑦 = {𝑋})
6564eqcomd 2616 . . . . . . . . . . . . . . . 16 (𝑦 = {𝑋} → {𝑋} = 𝑦)
6665adantl 481 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {𝑋}) → {𝑋} = 𝑦)
6763, 66eleqtrd 2690 . . . . . . . . . . . . . 14 ((𝑋𝑉𝑦 = {𝑋}) → 𝑋𝑦)
6867adantlr 747 . . . . . . . . . . . . 13 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ 𝑦 = {𝑋}) → 𝑋𝑦)
695ad2antrr 758 . . . . . . . . . . . . . 14 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑋𝑉)
70 simpl 472 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
7164necon3bi 2808 . . . . . . . . . . . . . . . . 17 𝑦 = {𝑋} → 𝑦 ≠ {𝑋})
7271adantl 481 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 ≠ {𝑋})
73 elprn1 38700 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ 𝑦 ≠ {𝑋}) → 𝑦 = {∅, 𝑋})
7470, 72, 73syl2anc 691 . . . . . . . . . . . . . . 15 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 = {∅, 𝑋})
7574adantll 746 . . . . . . . . . . . . . 14 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑦 = {∅, 𝑋})
7621adantr 480 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {∅, 𝑋}) → 𝑋 ∈ {∅, 𝑋})
77 id 22 . . . . . . . . . . . . . . . . 17 (𝑦 = {∅, 𝑋} → 𝑦 = {∅, 𝑋})
7877eqcomd 2616 . . . . . . . . . . . . . . . 16 (𝑦 = {∅, 𝑋} → {∅, 𝑋} = 𝑦)
7978adantl 481 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {∅, 𝑋}) → {∅, 𝑋} = 𝑦)
8076, 79eleqtrd 2690 . . . . . . . . . . . . . 14 ((𝑋𝑉𝑦 = {∅, 𝑋}) → 𝑋𝑦)
8169, 75, 80syl2anc 691 . . . . . . . . . . . . 13 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑋𝑦)
8268, 81pm2.61dan 828 . . . . . . . . . . . 12 ((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑋𝑦)
8382adantlr 747 . . . . . . . . . . 11 (((𝑋𝑉 ∧ ¬ 𝑋𝑦) ∧ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑋𝑦)
84 simplr 788 . . . . . . . . . . 11 (((𝑋𝑉 ∧ ¬ 𝑋𝑦) ∧ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → ¬ 𝑋𝑦)
8583, 84pm2.65da 598 . . . . . . . . . 10 ((𝑋𝑉 ∧ ¬ 𝑋𝑦) → ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
8685adantlr 747 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
87 elunnel2 38221 . . . . . . . . 9 ((𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑦 ∈ {∅, {∅}})
8861, 86, 87syl2anc 691 . . . . . . . 8 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ {∅, {∅}})
89 unieq 4380 . . . . . . . . . . 11 (𝑦 = ∅ → 𝑦 = ∅)
90 uni0 4401 . . . . . . . . . . . 12 ∅ = ∅
9190a1i 11 . . . . . . . . . . 11 (𝑦 = ∅ → ∅ = ∅)
9289, 91eqtrd 2644 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
9392adantl 481 . . . . . . . . 9 ((𝑦 ∈ {∅, {∅}} ∧ 𝑦 = ∅) → 𝑦 = ∅)
94 simpl 472 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 ∈ {∅, {∅}})
9527adantl 481 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 ≠ ∅)
96 elprn1 38700 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ 𝑦 ≠ ∅) → 𝑦 = {∅})
9794, 95, 96syl2anc 691 . . . . . . . . . 10 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 = {∅})
98 unieq 4380 . . . . . . . . . . 11 (𝑦 = {∅} → 𝑦 = {∅})
991unisn 4387 . . . . . . . . . . . 12 {∅} = ∅
10099a1i 11 . . . . . . . . . . 11 (𝑦 = {∅} → {∅} = ∅)
10198, 100eqtrd 2644 . . . . . . . . . 10 (𝑦 = {∅} → 𝑦 = ∅)
10297, 101syl 17 . . . . . . . . 9 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 = ∅)
10393, 102pm2.61dan 828 . . . . . . . 8 (𝑦 ∈ {∅, {∅}} → 𝑦 = ∅)
10488, 103syl 17 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 = ∅)
1052a1i 11 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → ∅ ∈ {∅, 𝑋})
106104, 105eqeltrd 2688 . . . . . 6 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ {∅, 𝑋})
10756, 106pm2.61dan 828 . . . . 5 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦 ∈ {∅, 𝑋})
108107a1d 25 . . . 4 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))
109108ralrimiva 2949 . . 3 (𝑋𝑉 → ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))
1103, 42, 1093jca 1235 . 2 (𝑋𝑉 → (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋})))
111 prex 4836 . . . 4 {∅, 𝑋} ∈ V
112111a1i 11 . . 3 (𝑋𝑉 → {∅, 𝑋} ∈ V)
113 issal 39210 . . 3 ({∅, 𝑋} ∈ V → ({∅, 𝑋} ∈ SAlg ↔ (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))))
114112, 113syl 17 . 2 (𝑋𝑉 → ({∅, 𝑋} ∈ SAlg ↔ (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))))
115110, 114mpbird 246 1 (𝑋𝑉 → {∅, 𝑋} ∈ SAlg)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wa 383  w3a 1031   = wceq 1475  wcel 1977  wne 2780  wral 2896  Vcvv 3173  cdif 3537  cun 3538  wss 3540  c0 3874  𝒫 cpw 4108  {csn 4125  {cpr 4127   cuni 4372   class class class wbr 4583  ωcom 6957  cdom 7839  SAlgcsalg 39204
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pr 4833
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-pw 4110  df-sn 4126  df-pr 4128  df-uni 4373  df-salg 39205
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator