Step | Hyp | Ref
| Expression |
1 | | subctctexmid.x |
. . . . 5
⊢ (𝜑 → ∀𝑥(∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→𝑥) → ∃𝑔 𝑔:ω–onto→(𝑥 ⊔ 1o))) |
2 | | omex 4569 |
. . . . . . . 8
⊢ ω
∈ V |
3 | 2 | rabex 4125 |
. . . . . . 7
⊢ {𝑧 ∈ ω ∣ 𝑦 = {∅}} ∈
V |
4 | 3 | a1i 9 |
. . . . . 6
⊢ (𝜑 → {𝑧 ∈ ω ∣ 𝑦 = {∅}} ∈ V) |
5 | | ssrab2 3226 |
. . . . . . 7
⊢ {𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊆
ω |
6 | | f1oi 5469 |
. . . . . . . . 9
⊢ ( I
↾ {𝑧 ∈ ω
∣ 𝑦 =
{∅}}):{𝑧 ∈
ω ∣ 𝑦 =
{∅}}–1-1-onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} |
7 | | f1ofo 5438 |
. . . . . . . . 9
⊢ (( I
↾ {𝑧 ∈ ω
∣ 𝑦 =
{∅}}):{𝑧 ∈
ω ∣ 𝑦 =
{∅}}–1-1-onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} → ( I ↾ {𝑧 ∈ ω ∣ 𝑦 = {∅}}):{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) |
8 | 6, 7 | ax-mp 5 |
. . . . . . . 8
⊢ ( I
↾ {𝑧 ∈ ω
∣ 𝑦 =
{∅}}):{𝑧 ∈
ω ∣ 𝑦 =
{∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} |
9 | | resiexg 4928 |
. . . . . . . . . 10
⊢ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ∈ V → (
I ↾ {𝑧 ∈ ω
∣ 𝑦 = {∅}})
∈ V) |
10 | 3, 9 | ax-mp 5 |
. . . . . . . . 9
⊢ ( I
↾ {𝑧 ∈ ω
∣ 𝑦 = {∅}})
∈ V |
11 | | foeq1 5405 |
. . . . . . . . 9
⊢ (𝑓 = ( I ↾ {𝑧 ∈ ω ∣ 𝑦 = {∅}}) → (𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} ↔ ( I ↾ {𝑧 ∈ ω ∣ 𝑦 = {∅}}):{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
12 | 10, 11 | spcev 2820 |
. . . . . . . 8
⊢ (( I
↾ {𝑧 ∈ ω
∣ 𝑦 =
{∅}}):{𝑧 ∈
ω ∣ 𝑦 =
{∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} →
∃𝑓 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) |
13 | 8, 12 | ax-mp 5 |
. . . . . . 7
⊢
∃𝑓 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} |
14 | 5, 13 | pm3.2i 270 |
. . . . . 6
⊢ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊆ ω
∧ ∃𝑓 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) |
15 | | sseq1 3164 |
. . . . . . . 8
⊢ (𝑠 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (𝑠 ⊆ ω ↔ {𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊆
ω)) |
16 | | foeq2 5406 |
. . . . . . . . 9
⊢ (𝑠 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} ↔ 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
17 | 16 | exbidv 1813 |
. . . . . . . 8
⊢ (𝑠 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}} ↔ ∃𝑓 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
18 | 15, 17 | anbi12d 465 |
. . . . . . 7
⊢ (𝑠 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → ((𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) ↔ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊆ ω ∧
∃𝑓 𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}))) |
19 | 18 | spcegv 2813 |
. . . . . 6
⊢ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ∈ V →
(({𝑧 ∈ ω ∣
𝑦 = {∅}} ⊆
ω ∧ ∃𝑓
𝑓:{𝑧 ∈ ω ∣ 𝑦 = {∅}}–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) → ∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}))) |
20 | 4, 14, 19 | mpisyl 1434 |
. . . . 5
⊢ (𝜑 → ∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
21 | | foeq3 5407 |
. . . . . . . . . 10
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (𝑓:𝑠–onto→𝑥 ↔ 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
22 | 21 | exbidv 1813 |
. . . . . . . . 9
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (∃𝑓 𝑓:𝑠–onto→𝑥 ↔ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}})) |
23 | 22 | anbi2d 460 |
. . . . . . . 8
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → ((𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→𝑥) ↔ (𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}))) |
24 | 23 | exbidv 1813 |
. . . . . . 7
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→𝑥) ↔ ∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}))) |
25 | | djueq1 7001 |
. . . . . . . . 9
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (𝑥 ⊔ 1o) = ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
26 | | foeq3 5407 |
. . . . . . . . 9
⊢ ((𝑥 ⊔ 1o) =
({𝑧 ∈ ω ∣
𝑦 = {∅}} ⊔
1o) → (𝑔:ω–onto→(𝑥 ⊔ 1o) ↔ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o))) |
27 | 25, 26 | syl 14 |
. . . . . . . 8
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (𝑔:ω–onto→(𝑥 ⊔ 1o) ↔ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o))) |
28 | 27 | exbidv 1813 |
. . . . . . 7
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → (∃𝑔 𝑔:ω–onto→(𝑥 ⊔ 1o) ↔ ∃𝑔 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o))) |
29 | 24, 28 | imbi12d 233 |
. . . . . 6
⊢ (𝑥 = {𝑧 ∈ ω ∣ 𝑦 = {∅}} → ((∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→𝑥) → ∃𝑔 𝑔:ω–onto→(𝑥 ⊔ 1o)) ↔
(∃𝑠(𝑠 ⊆ ω ∧
∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) → ∃𝑔 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)))) |
30 | 3, 29 | spcv 2819 |
. . . . 5
⊢
(∀𝑥(∃𝑠(𝑠 ⊆ ω ∧ ∃𝑓 𝑓:𝑠–onto→𝑥) → ∃𝑔 𝑔:ω–onto→(𝑥 ⊔ 1o)) →
(∃𝑠(𝑠 ⊆ ω ∧
∃𝑓 𝑓:𝑠–onto→{𝑧 ∈ ω ∣ 𝑦 = {∅}}) → ∃𝑔 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o))) |
31 | 1, 20, 30 | sylc 62 |
. . . 4
⊢ (𝜑 → ∃𝑔 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
32 | | fveq1 5484 |
. . . . . . . . . . . 12
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → (ℎ‘𝑛) = ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛)) |
33 | 32 | eqeq1d 2174 |
. . . . . . . . . . 11
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → ((ℎ‘𝑛) = 1o ↔ ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
34 | 33 | rexbidv 2466 |
. . . . . . . . . 10
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → (∃𝑛
∈ ω (ℎ‘𝑛) = 1o ↔ ∃𝑛 ∈ ω ((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
35 | 34 | notbid 657 |
. . . . . . . . 9
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → (¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o ↔ ¬ ∃𝑛 ∈ ω ((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
36 | 35 | notbid 657 |
. . . . . . . 8
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → (¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o ↔ ¬ ¬
∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
37 | 36, 34 | imbi12d 233 |
. . . . . . 7
⊢ (ℎ = (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)) → ((¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o → ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o) ↔ (¬ ¬
∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o → ∃𝑛 ∈ ω ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o))) |
38 | | subctctexmid.mk |
. . . . . . . . 9
⊢ (𝜑 → ω ∈
Markov) |
39 | | ismkvnex 7115 |
. . . . . . . . . 10
⊢ (ω
∈ Markov → (ω ∈ Markov ↔ ∀ℎ ∈ (2o
↑𝑚 ω)(¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o → ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o))) |
40 | 38, 39 | syl 14 |
. . . . . . . . 9
⊢ (𝜑 → (ω ∈ Markov
↔ ∀ℎ ∈
(2o ↑𝑚 ω)(¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o → ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o))) |
41 | 38, 40 | mpbid 146 |
. . . . . . . 8
⊢ (𝜑 → ∀ℎ ∈ (2o
↑𝑚 ω)(¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o → ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o)) |
42 | 41 | adantr 274 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
∀ℎ ∈
(2o ↑𝑚 ω)(¬ ¬ ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o → ∃𝑛 ∈ ω (ℎ‘𝑛) = 1o)) |
43 | | 1lt2o 6406 |
. . . . . . . . . . . 12
⊢
1o ∈ 2o |
44 | 43 | a1i 9 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
(1st ‘(𝑔‘𝑛)) = ∅) → 1o ∈
2o) |
45 | | 0lt2o 6405 |
. . . . . . . . . . . 12
⊢ ∅
∈ 2o |
46 | 45 | a1i 9 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
¬ (1st ‘(𝑔‘𝑛)) = ∅) → ∅ ∈
2o) |
47 | | simplr 520 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
48 | | fof 5409 |
. . . . . . . . . . . . . . 15
⊢ (𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o) →
𝑔:ω⟶({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
49 | 47, 48 | syl 14 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
𝑔:ω⟶({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
50 | | simpr 109 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
𝑛 ∈
ω) |
51 | 49, 50 | ffvelrnd 5620 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(𝑔‘𝑛) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
52 | | eldju1st 7032 |
. . . . . . . . . . . . 13
⊢ ((𝑔‘𝑛) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o) →
((1st ‘(𝑔‘𝑛)) = ∅ ∨ (1st
‘(𝑔‘𝑛)) =
1o)) |
53 | 51, 52 | syl 14 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
((1st ‘(𝑔‘𝑛)) = ∅ ∨ (1st
‘(𝑔‘𝑛)) =
1o)) |
54 | | 1n0 6396 |
. . . . . . . . . . . . . . . 16
⊢
1o ≠ ∅ |
55 | 54 | neii 2337 |
. . . . . . . . . . . . . . 15
⊢ ¬
1o = ∅ |
56 | | eqeq1 2172 |
. . . . . . . . . . . . . . 15
⊢
((1st ‘(𝑔‘𝑛)) = 1o → ((1st
‘(𝑔‘𝑛)) = ∅ ↔
1o = ∅)) |
57 | 55, 56 | mtbiri 665 |
. . . . . . . . . . . . . 14
⊢
((1st ‘(𝑔‘𝑛)) = 1o → ¬
(1st ‘(𝑔‘𝑛)) = ∅) |
58 | 57 | orim2i 751 |
. . . . . . . . . . . . 13
⊢
(((1st ‘(𝑔‘𝑛)) = ∅ ∨ (1st
‘(𝑔‘𝑛)) = 1o) →
((1st ‘(𝑔‘𝑛)) = ∅ ∨ ¬ (1st
‘(𝑔‘𝑛)) = ∅)) |
59 | | df-dc 825 |
. . . . . . . . . . . . 13
⊢
(DECID (1st ‘(𝑔‘𝑛)) = ∅ ↔ ((1st
‘(𝑔‘𝑛)) = ∅ ∨ ¬
(1st ‘(𝑔‘𝑛)) = ∅)) |
60 | 58, 59 | sylibr 133 |
. . . . . . . . . . . 12
⊢
(((1st ‘(𝑔‘𝑛)) = ∅ ∨ (1st
‘(𝑔‘𝑛)) = 1o) →
DECID (1st ‘(𝑔‘𝑛)) = ∅) |
61 | 53, 60 | syl 14 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
DECID (1st ‘(𝑔‘𝑛)) = ∅) |
62 | 44, 46, 61 | ifcldadc 3548 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ∈
2o) |
63 | 62 | fmpttd 5639 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(𝑛 ∈ ω ↦
if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)):ω⟶2o) |
64 | | 2fveq3 5490 |
. . . . . . . . . . . . . 14
⊢ (𝑤 = 𝑛 → (1st ‘(𝑔‘𝑤)) = (1st ‘(𝑔‘𝑛))) |
65 | 64 | eqeq1d 2174 |
. . . . . . . . . . . . 13
⊢ (𝑤 = 𝑛 → ((1st ‘(𝑔‘𝑤)) = ∅ ↔ (1st
‘(𝑔‘𝑛)) = ∅)) |
66 | 65 | ifbid 3540 |
. . . . . . . . . . . 12
⊢ (𝑤 = 𝑛 → if((1st ‘(𝑔‘𝑤)) = ∅, 1o, ∅) =
if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)) |
67 | | eqcom 2167 |
. . . . . . . . . . . 12
⊢ (𝑤 = 𝑛 ↔ 𝑛 = 𝑤) |
68 | | eqcom 2167 |
. . . . . . . . . . . 12
⊢
(if((1st ‘(𝑔‘𝑤)) = ∅, 1o, ∅) =
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ↔
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅)) |
69 | 66, 67, 68 | 3imtr3i 199 |
. . . . . . . . . . 11
⊢ (𝑛 = 𝑤 → if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅)) |
70 | 69 | cbvmptv 4077 |
. . . . . . . . . 10
⊢ (𝑛 ∈ ω ↦
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅)) =
(𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅)) |
71 | 70 | feq1i 5329 |
. . . . . . . . 9
⊢ ((𝑛 ∈ ω ↦
if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)):ω⟶2o ↔ (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)):ω⟶2o) |
72 | 63, 71 | sylib 121 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅)):ω⟶2o) |
73 | | 2onn 6485 |
. . . . . . . . . 10
⊢
2o ∈ ω |
74 | 73 | elexi 2737 |
. . . . . . . . 9
⊢
2o ∈ V |
75 | 74, 2 | elmap 6639 |
. . . . . . . 8
⊢ ((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o, ∅)) ∈
(2o ↑𝑚 ω) ↔ (𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅)):ω⟶2o) |
76 | 72, 75 | sylibr 133 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o, ∅)) ∈
(2o ↑𝑚 ω)) |
77 | 37, 42, 76 | rspcdva 2834 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(¬ ¬ ∃𝑛
∈ ω ((𝑤 ∈
ω ↦ if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o → ∃𝑛 ∈ ω ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
78 | | eqid 2165 |
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o, ∅)) =
(𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅)) |
79 | 78, 66, 50, 62 | fvmptd3 5578 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)) |
80 | 79 | eqeq1d 2174 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o ↔ if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o)) |
81 | 51 | adantr 274 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → (𝑔‘𝑛) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
82 | | simpr 109 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) |
83 | 82 | eqcomd 2171 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → 1o = if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)) |
84 | | eqifdc 3553 |
. . . . . . . . . . . . . . . . . . 19
⊢
(DECID (1st ‘(𝑔‘𝑛)) = ∅ → (1o =
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ↔
(((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ∨ (¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
∅)))) |
85 | 61, 84 | syl 14 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(1o = if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ↔
(((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ∨ (¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
∅)))) |
86 | | eqid 2165 |
. . . . . . . . . . . . . . . . . . 19
⊢
1o = 1o |
87 | | orcom 718 |
. . . . . . . . . . . . . . . . . . . 20
⊢
((((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ∨ (¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅))
↔ ((¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅)
∨ ((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o))) |
88 | 55 | intnan 919 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ¬
(¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
∅) |
89 | | biorf 734 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (¬
(¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅)
→ (((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ↔ ((¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅)
∨ ((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o)))) |
90 | 88, 89 | ax-mp 5 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ↔ ((¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅)
∨ ((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o))) |
91 | 87, 90 | bitr4i 186 |
. . . . . . . . . . . . . . . . . . 19
⊢
((((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ∨ (¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅))
↔ ((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o)) |
92 | 86, 91 | mpbiran2 931 |
. . . . . . . . . . . . . . . . . 18
⊢
((((1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o =
1o) ∨ (¬ (1st ‘(𝑔‘𝑛)) = ∅ ∧ 1o = ∅))
↔ (1st ‘(𝑔‘𝑛)) = ∅) |
93 | 85, 92 | bitrdi 195 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(1o = if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ↔
(1st ‘(𝑔‘𝑛)) = ∅)) |
94 | 93 | adantr 274 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → (1o = if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) ↔
(1st ‘(𝑔‘𝑛)) = ∅)) |
95 | 83, 94 | mpbid 146 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → (1st ‘(𝑔‘𝑛)) = ∅) |
96 | | eldju2ndl 7033 |
. . . . . . . . . . . . . . 15
⊢ (((𝑔‘𝑛) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o) ∧
(1st ‘(𝑔‘𝑛)) = ∅) → (2nd
‘(𝑔‘𝑛)) ∈ {𝑧 ∈ ω ∣ 𝑦 = {∅}}) |
97 | 81, 95, 96 | syl2anc 409 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → (2nd ‘(𝑔‘𝑛)) ∈ {𝑧 ∈ ω ∣ 𝑦 = {∅}}) |
98 | | biidd 171 |
. . . . . . . . . . . . . . 15
⊢ (𝑧 = (2nd ‘(𝑔‘𝑛)) → (𝑦 = {∅} ↔ 𝑦 = {∅})) |
99 | 98 | elrab 2881 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘(𝑔‘𝑛)) ∈ {𝑧 ∈ ω ∣ 𝑦 = {∅}} ↔ ((2nd
‘(𝑔‘𝑛)) ∈ ω ∧ 𝑦 = {∅})) |
100 | 97, 99 | sylib 121 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → ((2nd ‘(𝑔‘𝑛)) ∈ ω ∧ 𝑦 = {∅})) |
101 | 100 | simprd 113 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) ∧
if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) → 𝑦 =
{∅}) |
102 | 101 | ex 114 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o → 𝑦 =
{∅})) |
103 | 80, 102 | sylbid 149 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑛 ∈ ω) →
(((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o → 𝑦 =
{∅})) |
104 | 103 | rexlimdva 2582 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o → 𝑦 =
{∅})) |
105 | | simplr 520 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) → 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
106 | | biidd 171 |
. . . . . . . . . . . . . 14
⊢ (𝑧 = ∅ → (𝑦 = {∅} ↔ 𝑦 = {∅})) |
107 | | peano1 4570 |
. . . . . . . . . . . . . . 15
⊢ ∅
∈ ω |
108 | 107 | a1i 9 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
∅ ∈ ω) |
109 | | simpr 109 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) → 𝑦 = {∅}) |
110 | 106, 108,
109 | elrabd 2883 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
∅ ∈ {𝑧 ∈
ω ∣ 𝑦 =
{∅}}) |
111 | | djulcl 7012 |
. . . . . . . . . . . . 13
⊢ (∅
∈ {𝑧 ∈ ω
∣ 𝑦 = {∅}}
→ (inl‘∅) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
112 | 110, 111 | syl 14 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
(inl‘∅) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔
1o)) |
113 | | foelrn 5720 |
. . . . . . . . . . . 12
⊢ ((𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o) ∧
(inl‘∅) ∈ ({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
∃𝑛 ∈ ω
(inl‘∅) = (𝑔‘𝑛)) |
114 | 105, 112,
113 | syl2anc 409 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
∃𝑛 ∈ ω
(inl‘∅) = (𝑔‘𝑛)) |
115 | 79 | adantlr 469 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) ∧ 𝑛 ∈ ω) → ((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
if((1st ‘(𝑔‘𝑛)) = ∅, 1o,
∅)) |
116 | | fveq2 5485 |
. . . . . . . . . . . . . . . 16
⊢
((inl‘∅) = (𝑔‘𝑛) → (1st
‘(inl‘∅)) = (1st ‘(𝑔‘𝑛))) |
117 | | 1stinl 7035 |
. . . . . . . . . . . . . . . . 17
⊢ (∅
∈ ω → (1st ‘(inl‘∅)) =
∅) |
118 | 107, 117 | ax-mp 5 |
. . . . . . . . . . . . . . . 16
⊢
(1st ‘(inl‘∅)) = ∅ |
119 | 116, 118 | eqtr3di 2213 |
. . . . . . . . . . . . . . 15
⊢
((inl‘∅) = (𝑔‘𝑛) → (1st ‘(𝑔‘𝑛)) = ∅) |
120 | 119 | iftrued 3526 |
. . . . . . . . . . . . . 14
⊢
((inl‘∅) = (𝑔‘𝑛) → if((1st ‘(𝑔‘𝑛)) = ∅, 1o, ∅) =
1o) |
121 | 115, 120 | sylan9eq 2218 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) ∧ 𝑛 ∈ ω) ∧
(inl‘∅) = (𝑔‘𝑛)) → ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o) |
122 | 121 | ex 114 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) ∧ 𝑛 ∈ ω) →
((inl‘∅) = (𝑔‘𝑛) → ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
123 | 122 | reximdva 2567 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
(∃𝑛 ∈ ω
(inl‘∅) = (𝑔‘𝑛) → ∃𝑛 ∈ ω ((𝑤 ∈ ω ↦ if((1st
‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
124 | 114, 123 | mpd 13 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) ∧
𝑦 = {∅}) →
∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o) |
125 | 124 | ex 114 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(𝑦 = {∅} →
∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o)) |
126 | 104, 125 | impbid 128 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(∃𝑛 ∈ ω
((𝑤 ∈ ω ↦
if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o ↔ 𝑦 =
{∅})) |
127 | 126 | notbid 657 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(¬ ∃𝑛 ∈
ω ((𝑤 ∈ ω
↦ if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o ↔ ¬ 𝑦 = {∅})) |
128 | 127 | notbid 657 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(¬ ¬ ∃𝑛
∈ ω ((𝑤 ∈
ω ↦ if((1st ‘(𝑔‘𝑤)) = ∅, 1o,
∅))‘𝑛) =
1o ↔ ¬ ¬ 𝑦 = {∅})) |
129 | 77, 128, 126 | 3imtr3d 201 |
. . . . 5
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
(¬ ¬ 𝑦 = {∅}
→ 𝑦 =
{∅})) |
130 | | df-stab 821 |
. . . . 5
⊢
(STAB 𝑦 = {∅} ↔ (¬ ¬ 𝑦 = {∅} → 𝑦 = {∅})) |
131 | 129, 130 | sylibr 133 |
. . . 4
⊢ ((𝜑 ∧ 𝑔:ω–onto→({𝑧 ∈ ω ∣ 𝑦 = {∅}} ⊔ 1o)) →
STAB 𝑦 =
{∅}) |
132 | 31, 131 | exlimddv 1886 |
. . 3
⊢ (𝜑 → STAB 𝑦 = {∅}) |
133 | 132 | adantr 274 |
. 2
⊢ ((𝜑 ∧ 𝑦 ⊆ {∅}) →
STAB 𝑦 =
{∅}) |
134 | 133 | exmid1stab 13840 |
1
⊢ (𝜑 →
EXMID) |