MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  grudomon Structured version   Visualization version   GIF version

Theorem grudomon 10826
Description: Each ordinal that is comparable with an element of the universe is in the universe. (Contributed by Mario Carneiro, 10-Jun-2013.)
Assertion
Ref Expression
grudomon ((𝑈 ∈ Univ ∧ 𝐴 ∈ On ∧ (𝐵𝑈𝐴𝐵)) → 𝐴𝑈)

Proof of Theorem grudomon
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 breq1 5106 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝐵𝑦𝐵))
2 eleq1 2848 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝑈𝑦𝑈))
31, 2imbi12d 347 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝐵𝑥𝑈) ↔ (𝑦𝐵𝑦𝑈)))
43imbi2d 343 . . . . . 6 (𝑥 = 𝑦 → (((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵𝑥𝑈)) ↔ ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑦𝐵𝑦𝑈))))
5 breq1 5106 . . . . . . . 8 (𝑥 = 𝐴 → (𝑥𝐵𝐴𝐵))
6 eleq1 2848 . . . . . . . 8 (𝑥 = 𝐴 → (𝑥𝑈𝐴𝑈))
75, 6imbi12d 347 . . . . . . 7 (𝑥 = 𝐴 → ((𝑥𝐵𝑥𝑈) ↔ (𝐴𝐵𝐴𝑈)))
87imbi2d 343 . . . . . 6 (𝑥 = 𝐴 → (((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵𝑥𝑈)) ↔ ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝐴𝐵𝐴𝑈))))
9 r19.21v 3187 . . . . . . 7 (∀𝑦𝑥 ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑦𝐵𝑦𝑈)) ↔ ((𝑈 ∈ Univ ∧ 𝐵𝑈) → ∀𝑦𝑥 (𝑦𝐵𝑦𝑈)))
10 simpl1 1210 . . . . . . . . . . . . . . . 16 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → 𝑥 ∈ On)
11 vex 3454 . . . . . . . . . . . . . . . . 17 𝑥 ∈ V
12 onelss 6400 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ On → (𝑦𝑥𝑦𝑥))
1312imp 412 . . . . . . . . . . . . . . . . 17 ((𝑥 ∈ On ∧ 𝑦𝑥) → 𝑦𝑥)
14 ssdomg 9006 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ V → (𝑦𝑥𝑦𝑥))
1511, 13, 14mpsyl 69 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ On ∧ 𝑦𝑥) → 𝑦𝑥)
1610, 15sylan 592 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) ∧ 𝑦𝑥) → 𝑦𝑥)
17 simplr 781 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) ∧ 𝑦𝑥) → 𝑥𝐵)
18 domtr 9013 . . . . . . . . . . . . . . 15 ((𝑦𝑥𝑥𝐵) → 𝑦𝐵)
1916, 17, 18syl2anc 596 . . . . . . . . . . . . . 14 ((((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) ∧ 𝑦𝑥) → 𝑦𝐵)
20 pm2.27 43 . . . . . . . . . . . . . 14 (𝑦𝐵 → ((𝑦𝐵𝑦𝑈) → 𝑦𝑈))
2119, 20syl 18 . . . . . . . . . . . . 13 ((((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) ∧ 𝑦𝑥) → ((𝑦𝐵𝑦𝑈) → 𝑦𝑈))
2221ralimdva 3174 . . . . . . . . . . . 12 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (∀𝑦𝑥 (𝑦𝐵𝑦𝑈) → ∀𝑦𝑥 𝑦𝑈))
23 dfss3 3920 . . . . . . . . . . . . 13 (𝑥𝑈 ↔ ∀𝑦𝑥 𝑦𝑈)
24 domeng 8968 . . . . . . . . . . . . . . . 16 (𝐵𝑈 → (𝑥𝐵 ↔ ∃𝑦(𝑥𝑦𝑦𝐵)))
25243ad2ant3 1153 . . . . . . . . . . . . . . 15 ((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵 ↔ ∃𝑦(𝑥𝑦𝑦𝐵)))
2625biimpa 482 . . . . . . . . . . . . . 14 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → ∃𝑦(𝑥𝑦𝑦𝐵))
27 simpl2 1211 . . . . . . . . . . . . . . 15 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → 𝑈 ∈ Univ)
28 gruss 10805 . . . . . . . . . . . . . . . . . . . . 21 ((𝑈 ∈ Univ ∧ 𝐵𝑈𝑦𝐵) → 𝑦𝑈)
29283expia 1139 . . . . . . . . . . . . . . . . . . . 20 ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑦𝐵𝑦𝑈))
30293adant1 1148 . . . . . . . . . . . . . . . . . . 19 ((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑦𝐵𝑦𝑈))
3130adantr 486 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (𝑦𝐵𝑦𝑈))
32 ensym 9009 . . . . . . . . . . . . . . . . . 18 (𝑥𝑦𝑦𝑥)
3331, 32anim12d1 622 . . . . . . . . . . . . . . . . 17 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → ((𝑦𝐵𝑥𝑦) → (𝑦𝑈𝑦𝑥)))
3433ancomsd 471 . . . . . . . . . . . . . . . 16 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → ((𝑥𝑦𝑦𝐵) → (𝑦𝑈𝑦𝑥)))
3534eximdv 1950 . . . . . . . . . . . . . . 15 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (∃𝑦(𝑥𝑦𝑦𝐵) → ∃𝑦(𝑦𝑈𝑦𝑥)))
36 gruen 10821 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ 𝑥𝑈 ∧ (𝑦𝑈𝑦𝑥)) → 𝑥𝑈)
37363com23 1144 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ (𝑦𝑈𝑦𝑥) ∧ 𝑥𝑈) → 𝑥𝑈)
38373exp 1137 . . . . . . . . . . . . . . . 16 (𝑈 ∈ Univ → ((𝑦𝑈𝑦𝑥) → (𝑥𝑈𝑥𝑈)))
3938exlimdv 1966 . . . . . . . . . . . . . . 15 (𝑈 ∈ Univ → (∃𝑦(𝑦𝑈𝑦𝑥) → (𝑥𝑈𝑥𝑈)))
4027, 35, 39sylsyld 62 . . . . . . . . . . . . . 14 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (∃𝑦(𝑥𝑦𝑦𝐵) → (𝑥𝑈𝑥𝑈)))
4126, 40mpd 16 . . . . . . . . . . . . 13 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (𝑥𝑈𝑥𝑈))
4223, 41biimtrrid 246 . . . . . . . . . . . 12 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (∀𝑦𝑥 𝑦𝑈𝑥𝑈))
4322, 42syld 48 . . . . . . . . . . 11 (((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) ∧ 𝑥𝐵) → (∀𝑦𝑥 (𝑦𝐵𝑦𝑈) → 𝑥𝑈))
4443ex 418 . . . . . . . . . 10 ((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵 → (∀𝑦𝑥 (𝑦𝐵𝑦𝑈) → 𝑥𝑈)))
4544com23 87 . . . . . . . . 9 ((𝑥 ∈ On ∧ 𝑈 ∈ Univ ∧ 𝐵𝑈) → (∀𝑦𝑥 (𝑦𝐵𝑦𝑈) → (𝑥𝐵𝑥𝑈)))
46453expib 1140 . . . . . . . 8 (𝑥 ∈ On → ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (∀𝑦𝑥 (𝑦𝐵𝑦𝑈) → (𝑥𝐵𝑥𝑈))))
4746a2d 30 . . . . . . 7 (𝑥 ∈ On → (((𝑈 ∈ Univ ∧ 𝐵𝑈) → ∀𝑦𝑥 (𝑦𝐵𝑦𝑈)) → ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵𝑥𝑈))))
489, 47biimtrid 245 . . . . . 6 (𝑥 ∈ On → (∀𝑦𝑥 ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑦𝐵𝑦𝑈)) → ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝑥𝐵𝑥𝑈))))
494, 8, 48tfis3 7854 . . . . 5 (𝐴 ∈ On → ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝐴𝐵𝐴𝑈)))
5049com3l 90 . . . 4 ((𝑈 ∈ Univ ∧ 𝐵𝑈) → (𝐴𝐵 → (𝐴 ∈ On → 𝐴𝑈)))
5150impr 460 . . 3 ((𝑈 ∈ Univ ∧ (𝐵𝑈𝐴𝐵)) → (𝐴 ∈ On → 𝐴𝑈))
52513impia 1135 . 2 ((𝑈 ∈ Univ ∧ (𝐵𝑈𝐴𝐵) ∧ 𝐴 ∈ On) → 𝐴𝑈)
53523com23 1144 1 ((𝑈 ∈ Univ ∧ 𝐴 ∈ On ∧ (𝐵𝑈𝐴𝐵)) → 𝐴𝑈)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wex 1812  wcel 2145  wral 3076  Vcvv 3450  wss 3899   class class class wbr 5103  Oncon0 6357  cen 8949  cdom 8950  Univcgru 10799
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-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-sbc 3740  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-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-rn 5666  df-res 5667  df-ima 5668  df-ord 6360  df-on 6361  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-ov 7416  df-oprab 7417  df-mpo 7418  df-er 8696  df-map 8828  df-en 8953  df-dom 8954  df-gru 10800
This theorem is used by:  gruina  10827  grur1  10829
  Copyright terms: Public domain W3C validator