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

Theorem ordtypelem3 8973
Description: Lemma for ordtype 8985. (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 485 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀 ∈ (𝑇 ∩ dom 𝐹))
21elin2d 4180 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀 ∈ dom 𝐹)
3 ordtypelem.1 . . . . 5 𝐹 = recs(𝐺)
43tfr2a 8022 . . . 4 (𝑀 ∈ dom 𝐹 → (𝐹𝑀) = (𝐺‘(𝐹𝑀)))
52, 4syl 17 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) = (𝐺‘(𝐹𝑀)))
63tfr1a 8021 . . . . . . . . 9 (Fun 𝐹 ∧ Lim dom 𝐹)
76simpri 486 . . . . . . . 8 Lim dom 𝐹
8 limord 6248 . . . . . . . 8 (Lim dom 𝐹 → Ord dom 𝐹)
97, 8ax-mp 5 . . . . . . 7 Ord dom 𝐹
10 ordelord 6211 . . . . . . 7 ((Ord dom 𝐹𝑀 ∈ dom 𝐹) → Ord 𝑀)
119, 2, 10sylancr 587 . . . . . 6 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → Ord 𝑀)
123tfr2b 8023 . . . . . 6 (Ord 𝑀 → (𝑀 ∈ dom 𝐹 ↔ (𝐹𝑀) ∈ V))
1311, 12syl 17 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝑀 ∈ dom 𝐹 ↔ (𝐹𝑀) ∈ V))
142, 13mpbid 233 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) ∈ V)
15 ordtypelem.2 . . . . . . 7 𝐶 = {𝑤𝐴 ∣ ∀𝑗 ∈ ran 𝑗𝑅𝑤}
16 rneq 5805 . . . . . . . . . 10 ( = (𝐹𝑀) → ran = ran (𝐹𝑀))
17 df-ima 5567 . . . . . . . . . 10 (𝐹𝑀) = ran (𝐹𝑀)
1816, 17syl6eqr 2879 . . . . . . . . 9 ( = (𝐹𝑀) → ran = (𝐹𝑀))
1918raleqdv 3421 . . . . . . . 8 ( = (𝐹𝑀) → (∀𝑗 ∈ ran 𝑗𝑅𝑤 ↔ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤))
2019rabbidv 3486 . . . . . . 7 ( = (𝐹𝑀) → {𝑤𝐴 ∣ ∀𝑗 ∈ ran 𝑗𝑅𝑤} = {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤})
2115, 20syl5eq 2873 . . . . . 6 ( = (𝐹𝑀) → 𝐶 = {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤})
2221raleqdv 3421 . . . . . 6 ( = (𝐹𝑀) → (∀𝑢𝐶 ¬ 𝑢𝑅𝑣 ↔ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
2321, 22riotaeqbidv 7109 . . . . 5 ( = (𝐹𝑀) → (𝑣𝐶𝑢𝐶 ¬ 𝑢𝑅𝑣) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
24 ordtypelem.3 . . . . 5 𝐺 = ( ∈ V ↦ (𝑣𝐶𝑢𝐶 ¬ 𝑢𝑅𝑣))
25 riotaex 7110 . . . . 5 (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ V
2623, 24, 25fvmpt 6765 . . . 4 ((𝐹𝑀) ∈ V → (𝐺‘(𝐹𝑀)) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
2714, 26syl 17 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐺‘(𝐹𝑀)) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
285, 27eqtrd 2861 . 2 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) = (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣))
29 ordtypelem.7 . . . . 5 (𝜑𝑅 We 𝐴)
3029adantr 481 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑅 We 𝐴)
31 ordtypelem.8 . . . . 5 (𝜑𝑅 Se 𝐴)
3231adantr 481 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑅 Se 𝐴)
33 ssrab2 4060 . . . . 5 {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴
3433a1i 11 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴)
351elin1d 4179 . . . . . . 7 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → 𝑀𝑇)
36 imaeq2 5923 . . . . . . . . . . 11 (𝑥 = 𝑀 → (𝐹𝑥) = (𝐹𝑀))
3736raleqdv 3421 . . . . . . . . . 10 (𝑥 = 𝑀 → (∀𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
3837rexbidv 3302 . . . . . . . . 9 (𝑥 = 𝑀 → (∃𝑡𝐴𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡 ↔ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
39 ordtypelem.5 . . . . . . . . 9 𝑇 = {𝑥 ∈ On ∣ ∃𝑡𝐴𝑧 ∈ (𝐹𝑥)𝑧𝑅𝑡}
4038, 39elrab2 3687 . . . . . . . 8 (𝑀𝑇 ↔ (𝑀 ∈ On ∧ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4140simprbi 497 . . . . . . 7 (𝑀𝑇 → ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
4235, 41syl 17 . . . . . 6 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
43 breq1 5066 . . . . . . . . 9 (𝑗 = 𝑧 → (𝑗𝑅𝑤𝑧𝑅𝑤))
4443cbvralvw 3455 . . . . . . . 8 (∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑤)
45 breq2 5067 . . . . . . . . 9 (𝑤 = 𝑡 → (𝑧𝑅𝑤𝑧𝑅𝑡))
4645ralbidv 3202 . . . . . . . 8 (𝑤 = 𝑡 → (∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4744, 46syl5bb 284 . . . . . . 7 (𝑤 = 𝑡 → (∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∀𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡))
4847cbvrexvw 3456 . . . . . 6 (∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤 ↔ ∃𝑡𝐴𝑧 ∈ (𝐹𝑀)𝑧𝑅𝑡)
4942, 48sylibr 235 . . . . 5 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤)
50 rabn0 4343 . . . . 5 ({𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅ ↔ ∃𝑤𝐴𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤)
5149, 50sylibr 235 . . . 4 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅)
52 wereu2 5551 . . . 4 (((𝑅 We 𝐴𝑅 Se 𝐴) ∧ ({𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ⊆ 𝐴 ∧ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ≠ ∅)) → ∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣)
5330, 32, 34, 51, 52syl22anc 836 . . 3 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → ∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣)
54 riotacl2 7122 . . 3 (∃!𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣 → (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
5553, 54syl 17 . 2 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤}∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
5628, 55eqeltrd 2918 1 ((𝜑𝑀 ∈ (𝑇 ∩ dom 𝐹)) → (𝐹𝑀) ∈ {𝑣 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ∣ ∀𝑢 ∈ {𝑤𝐴 ∣ ∀𝑗 ∈ (𝐹𝑀)𝑗𝑅𝑤} ¬ 𝑢𝑅𝑣})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396   = wceq 1530  wcel 2107  wne 3021  wral 3143  wrex 3144  ∃!wreu 3145  {crab 3147  Vcvv 3500  cin 3939  wss 3940  c0 4295   class class class wbr 5063  cmpt 5143   Se wse 5511   We wwe 5512  dom cdm 5554  ran crn 5555  cres 5556  cima 5557  Ord word 6188  Oncon0 6189  Lim wlim 6190  Fun wfun 6346  cfv 6352  crio 7105  recscrecs 7998  OrdIsocoi 8962
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2798  ax-sep 5200  ax-nul 5207  ax-pow 5263  ax-pr 5326  ax-un 7451
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2620  df-eu 2652  df-clab 2805  df-cleq 2819  df-clel 2898  df-nfc 2968  df-ne 3022  df-ral 3148  df-rex 3149  df-reu 3150  df-rmo 3151  df-rab 3152  df-v 3502  df-sbc 3777  df-csb 3888  df-dif 3943  df-un 3945  df-in 3947  df-ss 3956  df-pss 3958  df-nul 4296  df-if 4471  df-pw 4544  df-sn 4565  df-pr 4567  df-tp 4569  df-op 4571  df-uni 4838  df-iun 4919  df-br 5064  df-opab 5126  df-mpt 5144  df-tr 5170  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-se 5514  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-pred 6146  df-ord 6192  df-on 6193  df-lim 6194  df-suc 6195  df-iota 6312  df-fun 6354  df-fn 6355  df-f 6356  df-f1 6357  df-fo 6358  df-f1o 6359  df-fv 6360  df-riota 7106  df-wrecs 7938  df-recs 7999
This theorem is referenced by:  ordtypelem4  8974  ordtypelem6  8976  ordtypelem7  8977
  Copyright terms: Public domain W3C validator