Users' Mathboxes Mathbox for Chen-Pang He < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  onsucconni Structured version   Visualization version   GIF version

Theorem onsucconni 37056
Description: A successor ordinal number is a connected topology. (Contributed by Chen-Pang He, 16-Oct-2015.)
Hypothesis
Ref Expression
onsucconni.1 𝐴 ∈ On
Assertion
Ref Expression
onsucconni suc 𝐴 ∈ Conn

Proof of Theorem onsucconni
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 onsucconni.1 . . 3 𝐴 ∈ On
2 onsuctop 37052 . . 3 (𝐴 ∈ On → suc 𝐴 ∈ Top)
31, 2ax-mp 5 . 2 suc 𝐴 ∈ Top
4 elin 3915 . . . 4 (𝑥 ∈ (suc 𝐴 ∩ (Clsd‘suc 𝐴)) ↔ (𝑥 ∈ suc 𝐴𝑥 ∈ (Clsd‘suc 𝐴)))
5 elsuci 6427 . . . . 5 (𝑥 ∈ suc 𝐴 → (𝑥𝐴𝑥 = 𝐴))
61onunisuci 6479 . . . . . . 7 suc 𝐴 = 𝐴
76eqcomi 2769 . . . . . 6 𝐴 = suc 𝐴
87cldopn 23256 . . . . 5 (𝑥 ∈ (Clsd‘suc 𝐴) → (𝐴𝑥) ∈ suc 𝐴)
91onsuci 7835 . . . . . . . . . 10 suc 𝐴 ∈ On
109oneli 6473 . . . . . . . . 9 ((𝐴𝑥) ∈ suc 𝐴 → (𝐴𝑥) ∈ On)
11 elndif 4080 . . . . . . . . . . . 12 (∅ ∈ 𝑥 → ¬ ∅ ∈ (𝐴𝑥))
12 on0eln0 6415 . . . . . . . . . . . . . 14 ((𝐴𝑥) ∈ On → (∅ ∈ (𝐴𝑥) ↔ (𝐴𝑥) ≠ ∅))
1312biimprd 251 . . . . . . . . . . . . 13 ((𝐴𝑥) ∈ On → ((𝐴𝑥) ≠ ∅ → ∅ ∈ (𝐴𝑥)))
1413necon1bd 2973 . . . . . . . . . . . 12 ((𝐴𝑥) ∈ On → (¬ ∅ ∈ (𝐴𝑥) → (𝐴𝑥) = ∅))
15 ssdif0 4314 . . . . . . . . . . . . 13 (𝐴𝑥 ↔ (𝐴𝑥) = ∅)
161onssneli 6475 . . . . . . . . . . . . 13 (𝐴𝑥 → ¬ 𝑥𝐴)
1715, 16sylbir 238 . . . . . . . . . . . 12 ((𝐴𝑥) = ∅ → ¬ 𝑥𝐴)
1811, 14, 17syl56 37 . . . . . . . . . . 11 ((𝐴𝑥) ∈ On → (∅ ∈ 𝑥 → ¬ 𝑥𝐴))
1918con2d 135 . . . . . . . . . 10 ((𝐴𝑥) ∈ On → (𝑥𝐴 → ¬ ∅ ∈ 𝑥))
201oneli 6473 . . . . . . . . . . . 12 (𝑥𝐴𝑥 ∈ On)
21 on0eln0 6415 . . . . . . . . . . . . 13 (𝑥 ∈ On → (∅ ∈ 𝑥𝑥 ≠ ∅))
2221biimprd 251 . . . . . . . . . . . 12 (𝑥 ∈ On → (𝑥 ≠ ∅ → ∅ ∈ 𝑥))
2320, 22syl 18 . . . . . . . . . . 11 (𝑥𝐴 → (𝑥 ≠ ∅ → ∅ ∈ 𝑥))
2423necon1bd 2973 . . . . . . . . . 10 (𝑥𝐴 → (¬ ∅ ∈ 𝑥𝑥 = ∅))
2519, 24sylcom 31 . . . . . . . . 9 ((𝐴𝑥) ∈ On → (𝑥𝐴𝑥 = ∅))
2610, 25syl 18 . . . . . . . 8 ((𝐴𝑥) ∈ suc 𝐴 → (𝑥𝐴𝑥 = ∅))
2726orim1d 981 . . . . . . 7 ((𝐴𝑥) ∈ suc 𝐴 → ((𝑥𝐴𝑥 = 𝐴) → (𝑥 = ∅ ∨ 𝑥 = 𝐴)))
2827impcom 413 . . . . . 6 (((𝑥𝐴𝑥 = 𝐴) ∧ (𝐴𝑥) ∈ suc 𝐴) → (𝑥 = ∅ ∨ 𝑥 = 𝐴))
29 vex 3454 . . . . . . 7 𝑥 ∈ V
3029elpr 4609 . . . . . 6 (𝑥 ∈ {∅, 𝐴} ↔ (𝑥 = ∅ ∨ 𝑥 = 𝐴))
3128, 30sylibr 237 . . . . 5 (((𝑥𝐴𝑥 = 𝐴) ∧ (𝐴𝑥) ∈ suc 𝐴) → 𝑥 ∈ {∅, 𝐴})
325, 8, 31syl2an 608 . . . 4 ((𝑥 ∈ suc 𝐴𝑥 ∈ (Clsd‘suc 𝐴)) → 𝑥 ∈ {∅, 𝐴})
334, 32sylbi 220 . . 3 (𝑥 ∈ (suc 𝐴 ∩ (Clsd‘suc 𝐴)) → 𝑥 ∈ {∅, 𝐴})
3433ssriv 3935 . 2 (suc 𝐴 ∩ (Clsd‘suc 𝐴)) ⊆ {∅, 𝐴}
357isconn2 23639 . 2 (suc 𝐴 ∈ Conn ↔ (suc 𝐴 ∈ Top ∧ (suc 𝐴 ∩ (Clsd‘suc 𝐴)) ⊆ {∅, 𝐴}))
363, 34, 35mpbir2an 724 1 suc 𝐴 ∈ Conn
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 401  wo 861   = wceq 1570  wcel 2145  wne 2955  cdif 3896  cin 3898  wss 3899  c0 4279  {cpr 4586   cuni 4867  Oncon0 6357  suc csuc 6359  cfv 6533  Topctop 23118  Clsdccld 23241  Conncconn 23636
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-ord 6360  df-on 6361  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-fv 6541  df-topgen 17528  df-top 23119  df-bases 23171  df-cld 23244  df-conn 23637
This theorem is used by:  onsucconn  37057
  Copyright terms: Public domain W3C validator