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 41329
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 5014 . . . . 5 ∅ ∈ V
21prid1 4515 . . . 4 ∅ ∈ {∅, 𝑋}
32a1i 11 . . 3 (𝑋𝑉 → ∅ ∈ {∅, 𝑋})
41a1i 11 . . . . . . . . 9 (𝑋𝑉 → ∅ ∈ V)
5 id 22 . . . . . . . . 9 (𝑋𝑉𝑋𝑉)
6 uniprg 4672 . . . . . . . . 9 ((∅ ∈ V ∧ 𝑋𝑉) → {∅, 𝑋} = (∅ ∪ 𝑋))
74, 5, 6syl2anc 581 . . . . . . . 8 (𝑋𝑉 {∅, 𝑋} = (∅ ∪ 𝑋))
8 uncom 3984 . . . . . . . . . 10 (∅ ∪ 𝑋) = (𝑋 ∪ ∅)
9 un0 4192 . . . . . . . . . 10 (𝑋 ∪ ∅) = 𝑋
108, 9eqtri 2849 . . . . . . . . 9 (∅ ∪ 𝑋) = 𝑋
1110a1i 11 . . . . . . . 8 (𝑋𝑉 → (∅ ∪ 𝑋) = 𝑋)
12 eqidd 2826 . . . . . . . 8 (𝑋𝑉𝑋 = 𝑋)
137, 11, 123eqtrd 2865 . . . . . . 7 (𝑋𝑉 {∅, 𝑋} = 𝑋)
1413difeq1d 3954 . . . . . 6 (𝑋𝑉 → ( {∅, 𝑋} ∖ 𝑦) = (𝑋𝑦))
1514adantr 474 . . . . 5 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → ( {∅, 𝑋} ∖ 𝑦) = (𝑋𝑦))
16 difeq2 3949 . . . . . . . . . 10 (𝑦 = ∅ → (𝑋𝑦) = (𝑋 ∖ ∅))
1716adantl 475 . . . . . . . . 9 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) = (𝑋 ∖ ∅))
18 dif0 4180 . . . . . . . . . 10 (𝑋 ∖ ∅) = 𝑋
1918a1i 11 . . . . . . . . 9 ((𝑋𝑉𝑦 = ∅) → (𝑋 ∖ ∅) = 𝑋)
2017, 19eqtrd 2861 . . . . . . . 8 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) = 𝑋)
21 prid2g 4514 . . . . . . . . 9 (𝑋𝑉𝑋 ∈ {∅, 𝑋})
2221adantr 474 . . . . . . . 8 ((𝑋𝑉𝑦 = ∅) → 𝑋 ∈ {∅, 𝑋})
2320, 22eqeltrd 2906 . . . . . . 7 ((𝑋𝑉𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
2423adantlr 708 . . . . . 6 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ 𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
25 simpll 785 . . . . . . 7 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → 𝑋𝑉)
26 simpl 476 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 ∈ {∅, 𝑋})
27 neqne 3007 . . . . . . . . . 10 𝑦 = ∅ → 𝑦 ≠ ∅)
2827adantl 475 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 ≠ ∅)
29 elprn1 40660 . . . . . . . . 9 ((𝑦 ∈ {∅, 𝑋} ∧ 𝑦 ≠ ∅) → 𝑦 = 𝑋)
3026, 28, 29syl2anc 581 . . . . . . . 8 ((𝑦 ∈ {∅, 𝑋} ∧ ¬ 𝑦 = ∅) → 𝑦 = 𝑋)
3130adantll 707 . . . . . . 7 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → 𝑦 = 𝑋)
32 difeq2 3949 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑋𝑦) = (𝑋𝑋))
33 difid 4178 . . . . . . . . . . 11 (𝑋𝑋) = ∅
3433a1i 11 . . . . . . . . . 10 (𝑦 = 𝑋 → (𝑋𝑋) = ∅)
3532, 34eqtrd 2861 . . . . . . . . 9 (𝑦 = 𝑋 → (𝑋𝑦) = ∅)
362a1i 11 . . . . . . . . 9 (𝑦 = 𝑋 → ∅ ∈ {∅, 𝑋})
3735, 36eqeltrd 2906 . . . . . . . 8 (𝑦 = 𝑋 → (𝑋𝑦) ∈ {∅, 𝑋})
3837adantl 475 . . . . . . 7 ((𝑋𝑉𝑦 = 𝑋) → (𝑋𝑦) ∈ {∅, 𝑋})
3925, 31, 38syl2anc 581 . . . . . 6 (((𝑋𝑉𝑦 ∈ {∅, 𝑋}) ∧ ¬ 𝑦 = ∅) → (𝑋𝑦) ∈ {∅, 𝑋})
4024, 39pm2.61dan 849 . . . . 5 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → (𝑋𝑦) ∈ {∅, 𝑋})
4115, 40eqeltrd 2906 . . . 4 ((𝑋𝑉𝑦 ∈ {∅, 𝑋}) → ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋})
4241ralrimiva 3175 . . 3 (𝑋𝑉 → ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋})
43 elpwi 4388 . . . . . . . . . . . . 13 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ⊆ {∅, 𝑋})
44 uniss 4681 . . . . . . . . . . . . 13 (𝑦 ⊆ {∅, 𝑋} → 𝑦 {∅, 𝑋})
4543, 44syl 17 . . . . . . . . . . . 12 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 {∅, 𝑋})
4645adantl 475 . . . . . . . . . . 11 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦 {∅, 𝑋})
4713adantr 474 . . . . . . . . . . 11 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → {∅, 𝑋} = 𝑋)
4846, 47sseqtrd 3866 . . . . . . . . . 10 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦𝑋)
4948adantr 474 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦𝑋)
50 elssuni 4689 . . . . . . . . . 10 (𝑋𝑦𝑋 𝑦)
5150adantl 475 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑋 𝑦)
5249, 51jca 509 . . . . . . . 8 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → ( 𝑦𝑋𝑋 𝑦))
53 eqss 3842 . . . . . . . 8 ( 𝑦 = 𝑋 ↔ ( 𝑦𝑋𝑋 𝑦))
5452, 53sylibr 226 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦 = 𝑋)
5521ad2antrr 719 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑋 ∈ {∅, 𝑋})
5654, 55eqeltrd 2906 . . . . . 6 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ 𝑋𝑦) → 𝑦 ∈ {∅, 𝑋})
57 id 22 . . . . . . . . . . . 12 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ∈ 𝒫 {∅, 𝑋})
58 pwpr 4652 . . . . . . . . . . . 12 𝒫 {∅, 𝑋} = ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}})
5957, 58syl6eleq 2916 . . . . . . . . . . 11 (𝑦 ∈ 𝒫 {∅, 𝑋} → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
6059adantr 474 . . . . . . . . . 10 ((𝑦 ∈ 𝒫 {∅, 𝑋} ∧ ¬ 𝑋𝑦) → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
6160adantll 707 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}))
62 snidg 4427 . . . . . . . . . . . . . . . 16 (𝑋𝑉𝑋 ∈ {𝑋})
6362adantr 474 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {𝑋}) → 𝑋 ∈ {𝑋})
64 id 22 . . . . . . . . . . . . . . . . 17 (𝑦 = {𝑋} → 𝑦 = {𝑋})
6564eqcomd 2831 . . . . . . . . . . . . . . . 16 (𝑦 = {𝑋} → {𝑋} = 𝑦)
6665adantl 475 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {𝑋}) → {𝑋} = 𝑦)
6763, 66eleqtrd 2908 . . . . . . . . . . . . . 14 ((𝑋𝑉𝑦 = {𝑋}) → 𝑋𝑦)
6867adantlr 708 . . . . . . . . . . . . 13 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ 𝑦 = {𝑋}) → 𝑋𝑦)
695ad2antrr 719 . . . . . . . . . . . . . 14 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑋𝑉)
70 simpl 476 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
7164necon3bi 3025 . . . . . . . . . . . . . . . . 17 𝑦 = {𝑋} → 𝑦 ≠ {𝑋})
7271adantl 475 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 ≠ {𝑋})
73 elprn1 40660 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ 𝑦 ≠ {𝑋}) → 𝑦 = {∅, 𝑋})
7470, 72, 73syl2anc 581 . . . . . . . . . . . . . . 15 ((𝑦 ∈ {{𝑋}, {∅, 𝑋}} ∧ ¬ 𝑦 = {𝑋}) → 𝑦 = {∅, 𝑋})
7574adantll 707 . . . . . . . . . . . . . 14 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑦 = {∅, 𝑋})
7621adantr 474 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {∅, 𝑋}) → 𝑋 ∈ {∅, 𝑋})
77 id 22 . . . . . . . . . . . . . . . . 17 (𝑦 = {∅, 𝑋} → 𝑦 = {∅, 𝑋})
7877eqcomd 2831 . . . . . . . . . . . . . . . 16 (𝑦 = {∅, 𝑋} → {∅, 𝑋} = 𝑦)
7978adantl 475 . . . . . . . . . . . . . . 15 ((𝑋𝑉𝑦 = {∅, 𝑋}) → {∅, 𝑋} = 𝑦)
8076, 79eleqtrd 2908 . . . . . . . . . . . . . 14 ((𝑋𝑉𝑦 = {∅, 𝑋}) → 𝑋𝑦)
8169, 75, 80syl2anc 581 . . . . . . . . . . . . 13 (((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 = {𝑋}) → 𝑋𝑦)
8268, 81pm2.61dan 849 . . . . . . . . . . . 12 ((𝑋𝑉𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑋𝑦)
8382adantlr 708 . . . . . . . . . . 11 (((𝑋𝑉 ∧ ¬ 𝑋𝑦) ∧ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑋𝑦)
84 simplr 787 . . . . . . . . . . 11 (((𝑋𝑉 ∧ ¬ 𝑋𝑦) ∧ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → ¬ 𝑋𝑦)
8583, 84pm2.65da 853 . . . . . . . . . 10 ((𝑋𝑉 ∧ ¬ 𝑋𝑦) → ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
8685adantlr 708 . . . . . . . . 9 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}})
87 elunnel2 40016 . . . . . . . . 9 ((𝑦 ∈ ({∅, {∅}} ∪ {{𝑋}, {∅, 𝑋}}) ∧ ¬ 𝑦 ∈ {{𝑋}, {∅, 𝑋}}) → 𝑦 ∈ {∅, {∅}})
8861, 86, 87syl2anc 581 . . . . . . . 8 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ {∅, {∅}})
89 unieq 4666 . . . . . . . . . . 11 (𝑦 = ∅ → 𝑦 = ∅)
90 uni0 4687 . . . . . . . . . . . 12 ∅ = ∅
9190a1i 11 . . . . . . . . . . 11 (𝑦 = ∅ → ∅ = ∅)
9289, 91eqtrd 2861 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
9392adantl 475 . . . . . . . . 9 ((𝑦 ∈ {∅, {∅}} ∧ 𝑦 = ∅) → 𝑦 = ∅)
94 simpl 476 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 ∈ {∅, {∅}})
9527adantl 475 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 ≠ ∅)
96 elprn1 40660 . . . . . . . . . . 11 ((𝑦 ∈ {∅, {∅}} ∧ 𝑦 ≠ ∅) → 𝑦 = {∅})
9794, 95, 96syl2anc 581 . . . . . . . . . 10 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 = {∅})
98 unieq 4666 . . . . . . . . . . 11 (𝑦 = {∅} → 𝑦 = {∅})
991unisn 4674 . . . . . . . . . . . 12 {∅} = ∅
10099a1i 11 . . . . . . . . . . 11 (𝑦 = {∅} → {∅} = ∅)
10198, 100eqtrd 2861 . . . . . . . . . 10 (𝑦 = {∅} → 𝑦 = ∅)
10297, 101syl 17 . . . . . . . . 9 ((𝑦 ∈ {∅, {∅}} ∧ ¬ 𝑦 = ∅) → 𝑦 = ∅)
10393, 102pm2.61dan 849 . . . . . . . 8 (𝑦 ∈ {∅, {∅}} → 𝑦 = ∅)
10488, 103syl 17 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 = ∅)
1052a1i 11 . . . . . . 7 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → ∅ ∈ {∅, 𝑋})
106104, 105eqeltrd 2906 . . . . . 6 (((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) ∧ ¬ 𝑋𝑦) → 𝑦 ∈ {∅, 𝑋})
10756, 106pm2.61dan 849 . . . . 5 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → 𝑦 ∈ {∅, 𝑋})
108107a1d 25 . . . 4 ((𝑋𝑉𝑦 ∈ 𝒫 {∅, 𝑋}) → (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))
109108ralrimiva 3175 . . 3 (𝑋𝑉 → ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))
1103, 42, 1093jca 1164 . 2 (𝑋𝑉 → (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋})))
111 prex 5130 . . . 4 {∅, 𝑋} ∈ V
112111a1i 11 . . 3 (𝑋𝑉 → {∅, 𝑋} ∈ V)
113 issal 41325 . . 3 ({∅, 𝑋} ∈ V → ({∅, 𝑋} ∈ SAlg ↔ (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))))
114112, 113syl 17 . 2 (𝑋𝑉 → ({∅, 𝑋} ∈ SAlg ↔ (∅ ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ {∅, 𝑋} ( {∅, 𝑋} ∖ 𝑦) ∈ {∅, 𝑋} ∧ ∀𝑦 ∈ 𝒫 {∅, 𝑋} (𝑦 ≼ ω → 𝑦 ∈ {∅, 𝑋}))))
115110, 114mpbird 249 1 (𝑋𝑉 → {∅, 𝑋} ∈ SAlg)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  wa 386  w3a 1113   = wceq 1658  wcel 2166  wne 2999  wral 3117  Vcvv 3414  cdif 3795  cun 3796  wss 3798  c0 4144  𝒫 cpw 4378  {csn 4397  {cpr 4399   cuni 4658   class class class wbr 4873  ωcom 7326  cdom 8220  SAlgcsalg 41319
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1896  ax-4 1910  ax-5 2011  ax-6 2077  ax-7 2114  ax-9 2175  ax-10 2194  ax-11 2209  ax-12 2222  ax-13 2391  ax-ext 2803  ax-sep 5005  ax-nul 5013  ax-pr 5127
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 881  df-3an 1115  df-tru 1662  df-ex 1881  df-nf 1885  df-sb 2070  df-clab 2812  df-cleq 2818  df-clel 2821  df-nfc 2958  df-ne 3000  df-ral 3122  df-rex 3123  df-rab 3126  df-v 3416  df-dif 3801  df-un 3803  df-in 3805  df-ss 3812  df-nul 4145  df-pw 4380  df-sn 4398  df-pr 4400  df-uni 4659  df-salg 41320
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator