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

Theorem ordtypelem3 9050
Description: Lemma for ordtype 9062. (Contributed by Mario Carneiro, 24-Jun-2015.)
Hypotheses
Ref Expression
ordtypelem.1 𝐹 = recs(𝐺)
ordtypelem.2 𝐶 = {𝑤𝐴 ∣ ∀𝑗 ∈ ran 𝑗𝑅𝑤}
ordtypelem.3 𝐺 = ( ∈ V ↦ (𝑣𝐶𝑢𝐶 ¬ 𝑢𝑅𝑣))
ordtypelem.5 𝑇 = {𝑥 ∈ On ∣ ∃𝑡𝐴𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡}
ordtypelem.6 𝑂 = OrdIso(𝑅, 𝐴)
ordtypelem.7 (𝜑𝑅 We 𝐴)
ordtypelem.8 (𝜑𝑅 Se 𝐴)
Assertion
Ref Expression
ordtypelem3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
Distinct variable groups:   𝑣,𝑢,𝐶   ,𝑗,𝑡,𝑢,𝑣,𝑤,𝑥,𝑧,𝑀   𝑅,,𝑗,𝑡,𝑢,𝑣,𝑤,𝑥,𝑧   𝐴,,𝑗,𝑡,𝑢,𝑣,𝑤,𝑥,𝑧   𝑡,𝑂,𝑢,𝑣,𝑥   𝜑,𝑡,𝑥   ,𝐹,𝑗,𝑡,𝑢,𝑣,𝑤,𝑥,𝑧
Allowed substitution hints:   𝜑(𝑧,𝑤,𝑣,𝑢,,𝑗)   𝐶(𝑥,𝑧,𝑤,𝑡,,𝑗)   𝑇(𝑥,𝑧,𝑤,𝑣,𝑢,𝑡,,𝑗)   𝐺(𝑥,𝑧,𝑤,𝑣,𝑢,𝑡,,𝑗)   𝑂(𝑧,𝑤,,𝑗)

Proof of Theorem ordtypelem3
StepHypRef Expression
1 simpr 488 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀 ∈ (𝑇 ∩ dom 𝐹))
21elin2d 4087 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀 ∈ dom 𝐹)
3 ordtypelem.1 . . . . 5 𝐹 = recs(𝐺)
43tfr2a 8053 . . . 4 (𝑀 ∈ dom 𝐹 → (𝐹𝑀) = (𝐺‘(𝐹𝑀)))
52, 4syl 17 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) = (𝐺‘(𝐹𝑀)))
63tfr1a 8052 . . . . . . . . 9 (Fun 𝐹 ∧ Lim dom 𝐹)
76simpri 489 . . . . . . . 8 Lim dom 𝐹
8 limord 6225 . . . . . . . 8 (Lim dom 𝐹 → Ord dom 𝐹)
97, 8ax-mp 5 . . . . . . 7 Ord dom 𝐹
10 ordelord 6188 . . . . . . 7 ((Ord dom 𝐹𝑀 ∈ dom 𝐹) → Ord 𝑀)
119, 2, 10sylancr 590 . . . . . 6 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → Ord 𝑀)
123tfr2b 8054 . . . . . 6 (Ord 𝑀 → (𝑀 ∈ dom 𝐹 ↔ (𝐹𝑀) ∈ V))
1311, 12syl 17 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝑀 ∈ dom 𝐹 ↔ (𝐹𝑀) ∈ V))
142, 13mpbid 235 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) ∈ V)
15 ordtypelem.2 . . . . . . 7 𝐶 = {𝑤𝐴 ∣ ∀𝑗 ∈ ran 𝑗𝑅𝑤}
16 rneq 5773 . . . . . . . . . 10 ( = (𝐹𝑀) → ran = ran (𝐹𝑀))
17 df-ima 5532 . . . . . . . . . 10 (𝐹𝑀) = ran (𝐹𝑀)
1816, 17eqtr4di 2791 . . . . . . . . 9 ( = (𝐹𝑀) → ran = (𝐹𝑀))
1918raleqdv 3315 . . . . . . . 8 ( = (𝐹𝑀) → (∀𝑗 ∈ ran 𝑗𝑅𝑤 ↔ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤))
2019rabbidv 3380 . . . . . . 7 ( = (𝐹𝑀) → {𝑤𝐴 ∣ ∀𝑗 ∈ ran 𝑗𝑅𝑤} = {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤})
2115, 20syl5eq 2785 . . . . . 6 ( = (𝐹𝑀) → 𝐶 = {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤})
2221raleqdv 3315 . . . . . 6 ( = (𝐹𝑀) → (∀𝑢𝐶 ¬ 𝑢𝑅𝑣 ↔ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
2321, 22riotaeqbidv 7124 . . . . 5 ( = (𝐹𝑀) → (𝑣𝐶𝑢𝐶 ¬ 𝑢𝑅𝑣) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
24 ordtypelem.3 . . . . 5 𝐺 = ( ∈ V ↦ (𝑣𝐶𝑢𝐶 ¬ 𝑢𝑅𝑣))
25 riotaex 7125 . . . . 5 (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ V
2623, 24, 25fvmpt 6769 . . . 4 ((𝐹𝑀) ∈ V → (𝐺‘(𝐹𝑀)) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
2714, 26syl 17 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐺‘(𝐹𝑀)) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
285, 27eqtrd 2773 . 2 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
29 ordtypelem.7 . . . . 5 (𝜑𝑅 We 𝐴)
3029adantr 484 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑅 We 𝐴)
31 ordtypelem.8 . . . . 5 (𝜑𝑅 Se 𝐴)
3231adantr 484 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑅 Se 𝐴)
33 ssrab2 3967 . . . . 5 {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴
3433a1i 11 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴)
351elin1d 4086 . . . . . . 7 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀𝑇)
36 imaeq2 5893 . . . . . . . . . . 11 (𝑥 = 𝑀 → (𝐹𝑥) = (𝐹𝑀))
3736raleqdv 3315 . . . . . . . . . 10 (𝑥 = 𝑀 → (∀𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
3837rexbidv 3206 . . . . . . . . 9 (𝑥 = 𝑀 → (∃𝑡𝐴𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡 ↔ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
39 ordtypelem.5 . . . . . . . . 9 𝑇 = {𝑥 ∈ On ∣ ∃𝑡𝐴𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡}
4038, 39elrab2 3588 . . . . . . . 8 (𝑀𝑇 ↔ (𝑀 ∈ On ∧ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4140simprbi 500 . . . . . . 7 (𝑀𝑇 → ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
4235, 41syl 17 . . . . . 6 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
43 breq1 5030 . . . . . . . . 9 (𝑗 = 𝑧 → (𝑗𝑅𝑤𝑧𝑅𝑤))
4443cbvralvw 3348 . . . . . . . 8 (∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑤)
45 breq2 5031 . . . . . . . . 9 (𝑤 = 𝑡 → (𝑧𝑅𝑤𝑧𝑅𝑡))
4645ralbidv 3109 . . . . . . . 8 (𝑤 = 𝑡 → (∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4744, 46syl5bb 286 . . . . . . 7 (𝑤 = 𝑡 → (∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4847cbvrexvw 3349 . . . . . 6 (∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
4942, 48sylibr 237 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤)
50 rabn0 4271 . . . . 5 ({𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅ ↔ ∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤)
5149, 50sylibr 237 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅)
52 wereu2 5516 . . . 4 (((𝑅 We 𝐴𝑅 Se 𝐴) ∧ ({𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴 ∧ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅)) → ∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣)
5330, 32, 34, 51, 52syl22anc 838 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣)
54 riotacl2 7138 . . 3 (∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣 → (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
5553, 54syl 17 . 2 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
5628, 55eqeltrd 2833 1 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399   = wceq 1542  wcel 2113  wne 2934  wral 3053  wrex 3054  ∃!wreu 3055  {crab 3057  Vcvv 3397  cin 3840  wss 3841  c0 4209   class class class wbr 5027  cmpt 5107   Se wse 5476   We wwe 5477  dom cdm 5519  ran crn 5520  cres 5521  cima 5522  Ord word 6165  Oncon0 6166  Lim wlim 6167  Fun wfun 6327  cfv 6333  crio 7120  recscrecs 8029  OrdIsocoi 9039
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 1916  ax-6 1974  ax-7 2019  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2161  ax-12 2178  ax-ext 2710  ax-sep 5164  ax-nul 5171  ax-pr 5293  ax-un 7473
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-ral 3058  df-rex 3059  df-reu 3060  df-rmo 3061  df-rab 3062  df-v 3399  df-sbc 3680  df-csb 3789  df-dif 3844  df-un 3846  df-in 3848  df-ss 3858  df-pss 3860  df-nul 4210  df-if 4412  df-pw 4487  df-sn 4514  df-pr 4516  df-tp 4518  df-op 4520  df-uni 4794  df-iun 4880  df-br 5028  df-opab 5090  df-mpt 5108  df-tr 5134  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6123  df-ord 6169  df-on 6170  df-lim 6171  df-suc 6172  df-iota 6291  df-fun 6335  df-fn 6336  df-f 6337  df-f1 6338  df-fo 6339  df-f1o 6340  df-fv 6341  df-riota 7121  df-wrecs 7969  df-recs 8030
This theorem is referenced by:  ordtypelem4  9051  ordtypelem6  9053  ordtypelem7  9054
  Copyright terms: Public domain W3C validator