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

Theorem grur1a 10805
Description: A characterization of Grothendieck universes, part 1. (Contributed by Mario Carneiro, 23-Jun-2013.)
Hypothesis
Ref Expression
gruina.1 𝐴 = (𝑈 ∩ On)
Assertion
Ref Expression
grur1a (𝑈 ∈ Univ → (𝑅1𝐴) ⊆ 𝑈)

Proof of Theorem grur1a
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gruina.1 . . . . . 6 𝐴 = (𝑈 ∩ On)
2 inss1 4190 . . . . . 6 (𝑈 ∩ On) ⊆ 𝑈
31, 2eqsstri 3984 . . . . 5 𝐴𝑈
4 sseq2 3964 . . . . 5 (𝑈 = ∅ → (𝐴𝑈𝐴 ⊆ ∅))
53, 4mpbii 236 . . . 4 (𝑈 = ∅ → 𝐴 ⊆ ∅)
6 ss0 4360 . . . 4 (𝐴 ⊆ ∅ → 𝐴 = ∅)
7 fveq2 6883 . . . . . 6 (𝐴 = ∅ → (𝑅1𝐴) = (𝑅1‘∅))
8 r10 9741 . . . . . 6 (𝑅1‘∅) = ∅
97, 8eqtrdi 2814 . . . . 5 (𝐴 = ∅ → (𝑅1𝐴) = ∅)
10 0ss 4358 . . . . 5 ∅ ⊆ 𝑈
119, 10eqsstrdi 3982 . . . 4 (𝐴 = ∅ → (𝑅1𝐴) ⊆ 𝑈)
125, 6, 113syl 19 . . 3 (𝑈 = ∅ → (𝑅1𝐴) ⊆ 𝑈)
1312a1i 11 . 2 (𝑈 ∈ Univ → (𝑈 = ∅ → (𝑅1𝐴) ⊆ 𝑈))
141gruina 10804 . . . . 5 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝐴 ∈ Inacc)
15 inawina 10676 . . . . 5 (𝐴 ∈ Inacc → 𝐴 ∈ Inaccw)
16 winaon 10674 . . . . . 6 (𝐴 ∈ Inaccw𝐴 ∈ On)
17 winalim 10681 . . . . . 6 (𝐴 ∈ Inaccw → Lim 𝐴)
18 r1lim 9745 . . . . . 6 ((𝐴 ∈ On ∧ Lim 𝐴) → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
1916, 17, 18syl2anc 595 . . . . 5 (𝐴 ∈ Inaccw → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
2014, 15, 193syl 19 . . . 4 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
21 inss2 4191 . . . . . . . . . . . 12 (𝑈 ∩ On) ⊆ On
221, 21eqsstri 3984 . . . . . . . . . . 11 𝐴 ⊆ On
2322sseli 3934 . . . . . . . . . 10 (𝑥𝐴𝑥 ∈ On)
24 eleq1 2851 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑥𝐴 ↔ ∅ ∈ 𝐴))
25 fveq2 6883 . . . . . . . . . . . . . . 15 (𝑥 = ∅ → (𝑅1𝑥) = (𝑅1‘∅))
2625, 8eqtrdi 2814 . . . . . . . . . . . . . 14 (𝑥 = ∅ → (𝑅1𝑥) = ∅)
2726eleq1d 2848 . . . . . . . . . . . . 13 (𝑥 = ∅ → ((𝑅1𝑥) ∈ 𝑈 ↔ ∅ ∈ 𝑈))
2824, 27imbi12d 347 . . . . . . . . . . . 12 (𝑥 = ∅ → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (∅ ∈ 𝐴 → ∅ ∈ 𝑈)))
29 eleq1 2851 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → (𝑥𝐴𝑦𝐴))
30 fveq2 6883 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝑅1𝑥) = (𝑅1𝑦))
3130eleq1d 2848 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝑅1𝑥) ∈ 𝑈 ↔ (𝑅1𝑦) ∈ 𝑈))
3229, 31imbi12d 347 . . . . . . . . . . . 12 (𝑥 = 𝑦 → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈)))
33 eleq1 2851 . . . . . . . . . . . . 13 (𝑥 = suc 𝑦 → (𝑥𝐴 ↔ suc 𝑦𝐴))
34 fveq2 6883 . . . . . . . . . . . . . 14 (𝑥 = suc 𝑦 → (𝑅1𝑥) = (𝑅1‘suc 𝑦))
3534eleq1d 2848 . . . . . . . . . . . . 13 (𝑥 = suc 𝑦 → ((𝑅1𝑥) ∈ 𝑈 ↔ (𝑅1‘suc 𝑦) ∈ 𝑈))
3633, 35imbi12d 347 . . . . . . . . . . . 12 (𝑥 = suc 𝑦 → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (suc 𝑦𝐴 → (𝑅1‘suc 𝑦) ∈ 𝑈)))
373sseli 3934 . . . . . . . . . . . . 13 (∅ ∈ 𝐴 → ∅ ∈ 𝑈)
3837a1i 11 . . . . . . . . . . . 12 (𝑈 ∈ Univ → (∅ ∈ 𝐴 → ∅ ∈ 𝑈))
39 simpr 489 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → suc 𝑦𝐴)
40 elelsuc 6438 . . . . . . . . . . . . . . . . . 18 (suc 𝑦𝐴 → suc 𝑦 ∈ suc 𝐴)
413sseli 3934 . . . . . . . . . . . . . . . . . . . . 21 (suc 𝑦𝐴 → suc 𝑦𝑈)
4241ne0d 4296 . . . . . . . . . . . . . . . . . . . 20 (suc 𝑦𝐴𝑈 ≠ ∅)
4314, 15, 163syl 19 . . . . . . . . . . . . . . . . . . . 20 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝐴 ∈ On)
4442, 43sylan2 604 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → 𝐴 ∈ On)
45 eloni 6372 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ On → Ord 𝐴)
46 ordsucelsuc 7819 . . . . . . . . . . . . . . . . . . 19 (Ord 𝐴 → (𝑦𝐴 ↔ suc 𝑦 ∈ suc 𝐴))
4744, 45, 463syl 19 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → (𝑦𝐴 ↔ suc 𝑦 ∈ suc 𝐴))
4840, 47imbitrrid 249 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → (suc 𝑦𝐴𝑦𝐴))
4939, 48mpd 16 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → 𝑦𝐴)
50 grupw 10781 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ (𝑅1𝑦) ∈ 𝑈) → 𝒫 (𝑅1𝑦) ∈ 𝑈)
5150ex 417 . . . . . . . . . . . . . . . . . 18 (𝑈 ∈ Univ → ((𝑅1𝑦) ∈ 𝑈 → 𝒫 (𝑅1𝑦) ∈ 𝑈))
5251adantr 485 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑅1𝑦) ∈ 𝑈 → 𝒫 (𝑅1𝑦) ∈ 𝑈))
53 r1suc 9743 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ On → (𝑅1‘suc 𝑦) = 𝒫 (𝑅1𝑦))
5453eleq1d 2848 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ On → ((𝑅1‘suc 𝑦) ∈ 𝑈 ↔ 𝒫 (𝑅1𝑦) ∈ 𝑈))
5554biimprcd 253 . . . . . . . . . . . . . . . . 17 (𝒫 (𝑅1𝑦) ∈ 𝑈 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))
5652, 55syl6 36 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑅1𝑦) ∈ 𝑈 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈)))
5749, 56embantd 60 . . . . . . . . . . . . . . 15 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈)))
5857ex 417 . . . . . . . . . . . . . 14 (𝑈 ∈ Univ → (suc 𝑦𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))))
5958com23 87 . . . . . . . . . . . . 13 (𝑈 ∈ Univ → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (suc 𝑦𝐴 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))))
6059com4r 95 . . . . . . . . . . . 12 (𝑦 ∈ On → (𝑈 ∈ Univ → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (suc 𝑦𝐴 → (𝑅1‘suc 𝑦) ∈ 𝑈))))
61 simpr 489 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → 𝑥𝐴)
623sseli 3934 . . . . . . . . . . . . . . . . . . . . 21 (𝑥𝐴𝑥𝑈)
6362ne0d 4296 . . . . . . . . . . . . . . . . . . . 20 (𝑥𝐴𝑈 ≠ ∅)
6463, 43sylan2 604 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → 𝐴 ∈ On)
65 ontr1 6410 . . . . . . . . . . . . . . . . . . . . . 22 (𝐴 ∈ On → ((𝑦𝑥𝑥𝐴) → 𝑦𝐴))
66 pm2.27 43 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))
6765, 66syl6 36 . . . . . . . . . . . . . . . . . . . . 21 (𝐴 ∈ On → ((𝑦𝑥𝑥𝐴) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈)))
6867expd 420 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∈ On → (𝑦𝑥 → (𝑥𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))))
6968com3r 88 . . . . . . . . . . . . . . . . . . 19 (𝑥𝐴 → (𝐴 ∈ On → (𝑦𝑥 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))))
7061, 64, 69sylc 66 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑦𝑥 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈)))
7170imp 411 . . . . . . . . . . . . . . . . 17 (((𝑈 ∈ Univ ∧ 𝑥𝐴) ∧ 𝑦𝑥) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))
7271ralimdva 3177 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → ∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
73 gruiun 10785 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ 𝑥𝑈 ∧ ∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈) → 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈)
74733expia 1139 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ 𝑥𝑈) → (∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
7562, 74sylan2 604 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
7672, 75syld 48 . . . . . . . . . . . . . . 15 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
77 vex 3459 . . . . . . . . . . . . . . . . . 18 𝑥 ∈ V
78 r1lim 9745 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ V ∧ Lim 𝑥) → (𝑅1𝑥) = 𝑦𝑥 (𝑅1𝑦))
7977, 78mpan 702 . . . . . . . . . . . . . . . . 17 (Lim 𝑥 → (𝑅1𝑥) = 𝑦𝑥 (𝑅1𝑦))
8079eleq1d 2848 . . . . . . . . . . . . . . . 16 (Lim 𝑥 → ((𝑅1𝑥) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
8180biimprd 251 . . . . . . . . . . . . . . 15 (Lim 𝑥 → ( 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 → (𝑅1𝑥) ∈ 𝑈))
8276, 81sylan9r 517 . . . . . . . . . . . . . 14 ((Lim 𝑥 ∧ (𝑈 ∈ Univ ∧ 𝑥𝐴)) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑥) ∈ 𝑈))
8382exp32 425 . . . . . . . . . . . . 13 (Lim 𝑥 → (𝑈 ∈ Univ → (𝑥𝐴 → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑥) ∈ 𝑈))))
8483com34 92 . . . . . . . . . . . 12 (Lim 𝑥 → (𝑈 ∈ Univ → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈))))
8528, 32, 36, 38, 60, 84tfinds2 7861 . . . . . . . . . . 11 (𝑥 ∈ On → (𝑈 ∈ Univ → (𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈)))
8685com3r 88 . . . . . . . . . 10 (𝑥𝐴 → (𝑥 ∈ On → (𝑈 ∈ Univ → (𝑅1𝑥) ∈ 𝑈)))
8723, 86mpd 16 . . . . . . . . 9 (𝑥𝐴 → (𝑈 ∈ Univ → (𝑅1𝑥) ∈ 𝑈))
8887impcom 412 . . . . . . . 8 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑅1𝑥) ∈ 𝑈)
89 gruelss 10780 . . . . . . . 8 ((𝑈 ∈ Univ ∧ (𝑅1𝑥) ∈ 𝑈) → (𝑅1𝑥) ⊆ 𝑈)
9088, 89syldan 602 . . . . . . 7 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑅1𝑥) ⊆ 𝑈)
9190ralrimiva 3157 . . . . . 6 (𝑈 ∈ Univ → ∀𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
92 iunss 5010 . . . . . 6 ( 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈 ↔ ∀𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9391, 92sylibr 237 . . . . 5 (𝑈 ∈ Univ → 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9493adantr 485 . . . 4 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9520, 94eqsstrd 3972 . . 3 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → (𝑅1𝐴) ⊆ 𝑈)
9695ex 417 . 2 (𝑈 ∈ Univ → (𝑈 ≠ ∅ → (𝑅1𝐴) ⊆ 𝑈))
9713, 96pm2.61dne 3044 1 (𝑈 ∈ Univ → (𝑅1𝐴) ⊆ 𝑈)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400   = wceq 1570  wcel 2143  wne 2958  wral 3079  Vcvv 3455  cin 3905  wss 3906  c0 4287  𝒫 cpw 4563   ciun 4957  Ord word 6361  Oncon0 6362  Lim wlim 6363  suc csuc 6364  cfv 6538  𝑅1cr1 9735  Inaccwcwina 10668  Inacccina 10669  Univcgru 10776
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-ac2 10448
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-er 8695  df-map 8827  df-en 8945  df-dom 8946  df-sdom 8947  df-r1 9737  df-card 9926  df-cf 9928  df-ac 10101  df-wina 10670  df-ina 10671  df-gru 10777
This theorem is referenced by:  grur1  10806
  Copyright terms: Public domain W3C validator