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

Theorem grur1a 10740
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 4172 . . . . . 6 (𝑈 ∩ On) ⊆ 𝑈
31, 2eqsstri 3968 . . . . 5 𝐴𝑈
4 sseq2 3948 . . . . 5 (𝑈 = ∅ → (𝐴𝑈𝐴 ⊆ ∅))
53, 4mpbii 234 . . . 4 (𝑈 = ∅ → 𝐴 ⊆ ∅)
6 ss0 4337 . . . 4 (𝐴 ⊆ ∅ → 𝐴 = ∅)
7 fveq2 6834 . . . . . 6 (𝐴 = ∅ → (𝑅1𝐴) = (𝑅1‘∅))
8 r10 9690 . . . . . 6 (𝑅1‘∅) = ∅
97, 8eqtrdi 2791 . . . . 5 (𝐴 = ∅ → (𝑅1𝐴) = ∅)
10 0ss 4335 . . . . 5 ∅ ⊆ 𝑈
119, 10eqsstrdi 3966 . . . 4 (𝐴 = ∅ → (𝑅1𝐴) ⊆ 𝑈)
125, 6, 113syl 18 . . 3 (𝑈 = ∅ → (𝑅1𝐴) ⊆ 𝑈)
1312a1i 11 . 2 (𝑈 ∈ Univ → (𝑈 = ∅ → (𝑅1𝐴) ⊆ 𝑈))
141gruina 10739 . . . . 5 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝐴 ∈ Inacc)
15 inawina 10611 . . . . 5 (𝐴 ∈ Inacc → 𝐴 ∈ Inaccw)
16 winaon 10609 . . . . . 6 (𝐴 ∈ Inaccw𝐴 ∈ On)
17 winalim 10616 . . . . . 6 (𝐴 ∈ Inaccw → Lim 𝐴)
18 r1lim 9694 . . . . . 6 ((𝐴 ∈ On ∧ Lim 𝐴) → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
1916, 17, 18syl2anc 590 . . . . 5 (𝐴 ∈ Inaccw → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
2014, 15, 193syl 18 . . . 4 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → (𝑅1𝐴) = 𝑥𝐴 (𝑅1𝑥))
21 inss2 4173 . . . . . . . . . . . 12 (𝑈 ∩ On) ⊆ On
221, 21eqsstri 3968 . . . . . . . . . . 11 𝐴 ⊆ On
2322sseli 3918 . . . . . . . . . 10 (𝑥𝐴𝑥 ∈ On)
24 eleq1 2828 . . . . . . . . . . . . 13 (𝑥 = ∅ → (𝑥𝐴 ↔ ∅ ∈ 𝐴))
25 fveq2 6834 . . . . . . . . . . . . . . 15 (𝑥 = ∅ → (𝑅1𝑥) = (𝑅1‘∅))
2625, 8eqtrdi 2791 . . . . . . . . . . . . . 14 (𝑥 = ∅ → (𝑅1𝑥) = ∅)
2726eleq1d 2825 . . . . . . . . . . . . 13 (𝑥 = ∅ → ((𝑅1𝑥) ∈ 𝑈 ↔ ∅ ∈ 𝑈))
2824, 27imbi12d 345 . . . . . . . . . . . 12 (𝑥 = ∅ → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (∅ ∈ 𝐴 → ∅ ∈ 𝑈)))
29 eleq1 2828 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → (𝑥𝐴𝑦𝐴))
30 fveq2 6834 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝑅1𝑥) = (𝑅1𝑦))
3130eleq1d 2825 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝑅1𝑥) ∈ 𝑈 ↔ (𝑅1𝑦) ∈ 𝑈))
3229, 31imbi12d 345 . . . . . . . . . . . 12 (𝑥 = 𝑦 → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈)))
33 eleq1 2828 . . . . . . . . . . . . 13 (𝑥 = suc 𝑦 → (𝑥𝐴 ↔ suc 𝑦𝐴))
34 fveq2 6834 . . . . . . . . . . . . . 14 (𝑥 = suc 𝑦 → (𝑅1𝑥) = (𝑅1‘suc 𝑦))
3534eleq1d 2825 . . . . . . . . . . . . 13 (𝑥 = suc 𝑦 → ((𝑅1𝑥) ∈ 𝑈 ↔ (𝑅1‘suc 𝑦) ∈ 𝑈))
3633, 35imbi12d 345 . . . . . . . . . . . 12 (𝑥 = suc 𝑦 → ((𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈) ↔ (suc 𝑦𝐴 → (𝑅1‘suc 𝑦) ∈ 𝑈)))
373sseli 3918 . . . . . . . . . . . . 13 (∅ ∈ 𝐴 → ∅ ∈ 𝑈)
3837a1i 11 . . . . . . . . . . . 12 (𝑈 ∈ Univ → (∅ ∈ 𝐴 → ∅ ∈ 𝑈))
39 simpr 485 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → suc 𝑦𝐴)
40 elelsuc 6392 . . . . . . . . . . . . . . . . . 18 (suc 𝑦𝐴 → suc 𝑦 ∈ suc 𝐴)
413sseli 3918 . . . . . . . . . . . . . . . . . . . . 21 (suc 𝑦𝐴 → suc 𝑦𝑈)
4241ne0d 4277 . . . . . . . . . . . . . . . . . . . 20 (suc 𝑦𝐴𝑈 ≠ ∅)
4314, 15, 163syl 18 . . . . . . . . . . . . . . . . . . . 20 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝐴 ∈ On)
4442, 43sylan2 599 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → 𝐴 ∈ On)
45 eloni 6327 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ On → Ord 𝐴)
46 ordsucelsuc 7769 . . . . . . . . . . . . . . . . . . 19 (Ord 𝐴 → (𝑦𝐴 ↔ suc 𝑦 ∈ suc 𝐴))
4744, 45, 463syl 18 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → (𝑦𝐴 ↔ suc 𝑦 ∈ suc 𝐴))
4840, 47imbitrrid 247 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → (suc 𝑦𝐴𝑦𝐴))
4939, 48mpd 15 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → 𝑦𝐴)
50 grupw 10716 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ (𝑅1𝑦) ∈ 𝑈) → 𝒫 (𝑅1𝑦) ∈ 𝑈)
5150ex 413 . . . . . . . . . . . . . . . . . 18 (𝑈 ∈ Univ → ((𝑅1𝑦) ∈ 𝑈 → 𝒫 (𝑅1𝑦) ∈ 𝑈))
5251adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑅1𝑦) ∈ 𝑈 → 𝒫 (𝑅1𝑦) ∈ 𝑈))
53 r1suc 9692 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ On → (𝑅1‘suc 𝑦) = 𝒫 (𝑅1𝑦))
5453eleq1d 2825 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ On → ((𝑅1‘suc 𝑦) ∈ 𝑈 ↔ 𝒫 (𝑅1𝑦) ∈ 𝑈))
5554biimprcd 251 . . . . . . . . . . . . . . . . 17 (𝒫 (𝑅1𝑦) ∈ 𝑈 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))
5652, 55syl6 35 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑅1𝑦) ∈ 𝑈 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈)))
5749, 56embantd 59 . . . . . . . . . . . . . . 15 ((𝑈 ∈ Univ ∧ suc 𝑦𝐴) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈)))
5857ex 413 . . . . . . . . . . . . . 14 (𝑈 ∈ Univ → (suc 𝑦𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))))
5958com23 86 . . . . . . . . . . . . 13 (𝑈 ∈ Univ → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (suc 𝑦𝐴 → (𝑦 ∈ On → (𝑅1‘suc 𝑦) ∈ 𝑈))))
6059com4r 94 . . . . . . . . . . . 12 (𝑦 ∈ On → (𝑈 ∈ Univ → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (suc 𝑦𝐴 → (𝑅1‘suc 𝑦) ∈ 𝑈))))
61 simpr 485 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → 𝑥𝐴)
623sseli 3918 . . . . . . . . . . . . . . . . . . . . 21 (𝑥𝐴𝑥𝑈)
6362ne0d 4277 . . . . . . . . . . . . . . . . . . . 20 (𝑥𝐴𝑈 ≠ ∅)
6463, 43sylan2 599 . . . . . . . . . . . . . . . . . . 19 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → 𝐴 ∈ On)
65 ontr1 6364 . . . . . . . . . . . . . . . . . . . . . 22 (𝐴 ∈ On → ((𝑦𝑥𝑥𝐴) → 𝑦𝐴))
66 pm2.27 42 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))
6765, 66syl6 35 . . . . . . . . . . . . . . . . . . . . 21 (𝐴 ∈ On → ((𝑦𝑥𝑥𝐴) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈)))
6867expd 416 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∈ On → (𝑦𝑥 → (𝑥𝐴 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))))
6968com3r 87 . . . . . . . . . . . . . . . . . . 19 (𝑥𝐴 → (𝐴 ∈ On → (𝑦𝑥 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))))
7061, 64, 69sylc 65 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑦𝑥 → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈)))
7170imp 407 . . . . . . . . . . . . . . . . 17 (((𝑈 ∈ Univ ∧ 𝑥𝐴) ∧ 𝑦𝑥) → ((𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑦) ∈ 𝑈))
7271ralimdva 3152 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → ∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
73 gruiun 10720 . . . . . . . . . . . . . . . . . 18 ((𝑈 ∈ Univ ∧ 𝑥𝑈 ∧ ∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈) → 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈)
74733expia 1127 . . . . . . . . . . . . . . . . 17 ((𝑈 ∈ Univ ∧ 𝑥𝑈) → (∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
7562, 74sylan2 599 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
7672, 75syld 47 . . . . . . . . . . . . . . 15 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
77 vex 3436 . . . . . . . . . . . . . . . . . 18 𝑥 ∈ V
78 r1lim 9694 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ V ∧ Lim 𝑥) → (𝑅1𝑥) = 𝑦𝑥 (𝑅1𝑦))
7977, 78mpan 696 . . . . . . . . . . . . . . . . 17 (Lim 𝑥 → (𝑅1𝑥) = 𝑦𝑥 (𝑅1𝑦))
8079eleq1d 2825 . . . . . . . . . . . . . . . 16 (Lim 𝑥 → ((𝑅1𝑥) ∈ 𝑈 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈))
8180biimprd 249 . . . . . . . . . . . . . . 15 (Lim 𝑥 → ( 𝑦𝑥 (𝑅1𝑦) ∈ 𝑈 → (𝑅1𝑥) ∈ 𝑈))
8276, 81sylan9r 513 . . . . . . . . . . . . . 14 ((Lim 𝑥 ∧ (𝑈 ∈ Univ ∧ 𝑥𝐴)) → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑥) ∈ 𝑈))
8382exp32 421 . . . . . . . . . . . . 13 (Lim 𝑥 → (𝑈 ∈ Univ → (𝑥𝐴 → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑅1𝑥) ∈ 𝑈))))
8483com34 91 . . . . . . . . . . . 12 (Lim 𝑥 → (𝑈 ∈ Univ → (∀𝑦𝑥 (𝑦𝐴 → (𝑅1𝑦) ∈ 𝑈) → (𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈))))
8528, 32, 36, 38, 60, 84tfinds2 7811 . . . . . . . . . . 11 (𝑥 ∈ On → (𝑈 ∈ Univ → (𝑥𝐴 → (𝑅1𝑥) ∈ 𝑈)))
8685com3r 87 . . . . . . . . . 10 (𝑥𝐴 → (𝑥 ∈ On → (𝑈 ∈ Univ → (𝑅1𝑥) ∈ 𝑈)))
8723, 86mpd 15 . . . . . . . . 9 (𝑥𝐴 → (𝑈 ∈ Univ → (𝑅1𝑥) ∈ 𝑈))
8887impcom 408 . . . . . . . 8 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑅1𝑥) ∈ 𝑈)
89 gruelss 10715 . . . . . . . 8 ((𝑈 ∈ Univ ∧ (𝑅1𝑥) ∈ 𝑈) → (𝑅1𝑥) ⊆ 𝑈)
9088, 89syldan 597 . . . . . . 7 ((𝑈 ∈ Univ ∧ 𝑥𝐴) → (𝑅1𝑥) ⊆ 𝑈)
9190ralrimiva 3132 . . . . . 6 (𝑈 ∈ Univ → ∀𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
92 iunss 4981 . . . . . 6 ( 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈 ↔ ∀𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9391, 92sylibr 235 . . . . 5 (𝑈 ∈ Univ → 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9493adantr 481 . . . 4 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → 𝑥𝐴 (𝑅1𝑥) ⊆ 𝑈)
9520, 94eqsstrd 3956 . . 3 ((𝑈 ∈ Univ ∧ 𝑈 ≠ ∅) → (𝑅1𝐴) ⊆ 𝑈)
9695ex 413 . 2 (𝑈 ∈ Univ → (𝑈 ≠ ∅ → (𝑅1𝐴) ⊆ 𝑈))
9713, 96pm2.61dne 3021 1 (𝑈 ∈ Univ → (𝑅1𝐴) ⊆ 𝑈)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396   = wceq 1547  wcel 2119  wne 2935  wral 3054  Vcvv 3432  cin 3889  wss 3890  c0 4268  𝒫 cpw 4536   ciun 4928  Ord word 6316  Oncon0 6317  Lim wlim 6318  suc csuc 6319  cfv 6492  𝑅1cr1 9684  Inaccwcwina 10603  Inacccina 10604  Univcgru 10711
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-ac2 10383
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-er 8640  df-map 8772  df-en 8891  df-dom 8892  df-sdom 8893  df-r1 9686  df-card 9861  df-cf 9863  df-ac 10036  df-wina 10605  df-ina 10606  df-gru 10712
This theorem is referenced by:  grur1  10741
  Copyright terms: Public domain W3C validator