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

Theorem tfrlem16 7353
Description: Lemma for finite recursion. Without assuming ax-rep 4693, we can show that the domain of the constructed function is a limit ordinal, and hence contains all the finite ordinals. (Contributed by Mario Carneiro, 14-Nov-2014.)
Hypothesis
Ref Expression
tfrlem.1 𝐴 = {𝑓 ∣ ∃𝑥 ∈ On (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐹‘(𝑓𝑦)))}
Assertion
Ref Expression
tfrlem16 Lim dom recs(𝐹)
Distinct variable group:   𝑥,𝑓,𝑦,𝐹
Allowed substitution hints:   𝐴(𝑥,𝑦,𝑓)

Proof of Theorem tfrlem16
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 tfrlem.1 . . . 4 𝐴 = {𝑓 ∣ ∃𝑥 ∈ On (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐹‘(𝑓𝑦)))}
21tfrlem8 7344 . . 3 Ord dom recs(𝐹)
3 ordzsl 6914 . . 3 (Ord dom recs(𝐹) ↔ (dom recs(𝐹) = ∅ ∨ ∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧 ∨ Lim dom recs(𝐹)))
42, 3mpbi 218 . 2 (dom recs(𝐹) = ∅ ∨ ∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧 ∨ Lim dom recs(𝐹))
5 res0 5308 . . . . . . 7 (recs(𝐹) ↾ ∅) = ∅
6 0ex 4713 . . . . . . 7 ∅ ∈ V
75, 6eqeltri 2683 . . . . . 6 (recs(𝐹) ↾ ∅) ∈ V
8 0elon 5681 . . . . . . 7 ∅ ∈ On
91tfrlem15 7352 . . . . . . 7 (∅ ∈ On → (∅ ∈ dom recs(𝐹) ↔ (recs(𝐹) ↾ ∅) ∈ V))
108, 9ax-mp 5 . . . . . 6 (∅ ∈ dom recs(𝐹) ↔ (recs(𝐹) ↾ ∅) ∈ V)
117, 10mpbir 219 . . . . 5 ∅ ∈ dom recs(𝐹)
1211n0ii 3880 . . . 4 ¬ dom recs(𝐹) = ∅
1312pm2.21i 114 . . 3 (dom recs(𝐹) = ∅ → Lim dom recs(𝐹))
141tfrlem13 7350 . . . . 5 ¬ recs(𝐹) ∈ V
15 simpr 475 . . . . . . . . . 10 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → dom recs(𝐹) = suc 𝑧)
16 df-suc 5632 . . . . . . . . . 10 suc 𝑧 = (𝑧 ∪ {𝑧})
1715, 16syl6eq 2659 . . . . . . . . 9 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → dom recs(𝐹) = (𝑧 ∪ {𝑧}))
1817reseq2d 5304 . . . . . . . 8 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → (recs(𝐹) ↾ dom recs(𝐹)) = (recs(𝐹) ↾ (𝑧 ∪ {𝑧})))
191tfrlem6 7342 . . . . . . . . 9 Rel recs(𝐹)
20 resdm 5348 . . . . . . . . 9 (Rel recs(𝐹) → (recs(𝐹) ↾ dom recs(𝐹)) = recs(𝐹))
2119, 20ax-mp 5 . . . . . . . 8 (recs(𝐹) ↾ dom recs(𝐹)) = recs(𝐹)
22 resundi 5317 . . . . . . . 8 (recs(𝐹) ↾ (𝑧 ∪ {𝑧})) = ((recs(𝐹) ↾ 𝑧) ∪ (recs(𝐹) ↾ {𝑧}))
2318, 21, 223eqtr3g 2666 . . . . . . 7 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → recs(𝐹) = ((recs(𝐹) ↾ 𝑧) ∪ (recs(𝐹) ↾ {𝑧})))
24 vex 3175 . . . . . . . . . . 11 𝑧 ∈ V
2524sucid 5707 . . . . . . . . . 10 𝑧 ∈ suc 𝑧
2625, 15syl5eleqr 2694 . . . . . . . . 9 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → 𝑧 ∈ dom recs(𝐹))
271tfrlem9a 7346 . . . . . . . . 9 (𝑧 ∈ dom recs(𝐹) → (recs(𝐹) ↾ 𝑧) ∈ V)
2826, 27syl 17 . . . . . . . 8 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → (recs(𝐹) ↾ 𝑧) ∈ V)
29 snex 4830 . . . . . . . . 9 {⟨𝑧, (recs(𝐹)‘𝑧)⟩} ∈ V
301tfrlem7 7343 . . . . . . . . . 10 Fun recs(𝐹)
31 funressn 6309 . . . . . . . . . 10 (Fun recs(𝐹) → (recs(𝐹) ↾ {𝑧}) ⊆ {⟨𝑧, (recs(𝐹)‘𝑧)⟩})
3230, 31ax-mp 5 . . . . . . . . 9 (recs(𝐹) ↾ {𝑧}) ⊆ {⟨𝑧, (recs(𝐹)‘𝑧)⟩}
3329, 32ssexi 4726 . . . . . . . 8 (recs(𝐹) ↾ {𝑧}) ∈ V
34 unexg 6834 . . . . . . . 8 (((recs(𝐹) ↾ 𝑧) ∈ V ∧ (recs(𝐹) ↾ {𝑧}) ∈ V) → ((recs(𝐹) ↾ 𝑧) ∪ (recs(𝐹) ↾ {𝑧})) ∈ V)
3528, 33, 34sylancl 692 . . . . . . 7 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → ((recs(𝐹) ↾ 𝑧) ∪ (recs(𝐹) ↾ {𝑧})) ∈ V)
3623, 35eqeltrd 2687 . . . . . 6 ((𝑧 ∈ On ∧ dom recs(𝐹) = suc 𝑧) → recs(𝐹) ∈ V)
3736rexlimiva 3009 . . . . 5 (∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧 → recs(𝐹) ∈ V)
3814, 37mto 186 . . . 4 ¬ ∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧
3938pm2.21i 114 . . 3 (∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧 → Lim dom recs(𝐹))
40 id 22 . . 3 (Lim dom recs(𝐹) → Lim dom recs(𝐹))
4113, 39, 403jaoi 1382 . 2 ((dom recs(𝐹) = ∅ ∨ ∃𝑧 ∈ On dom recs(𝐹) = suc 𝑧 ∨ Lim dom recs(𝐹)) → Lim dom recs(𝐹))
424, 41ax-mp 5 1 Lim dom recs(𝐹)
Colors of variables: wff setvar class
Syntax hints:  wb 194  wa 382  w3o 1029   = wceq 1474  wcel 1976  {cab 2595  wral 2895  wrex 2896  Vcvv 3172  cun 3537  wss 3539  c0 3873  {csn 4124  cop 4130  dom cdm 5028  cres 5030  Rel wrel 5033  Ord word 5625  Oncon0 5626  Lim wlim 5627  suc csuc 5628  Fun wfun 5784   Fn wfn 5785  cfv 5790  recscrecs 7331
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-8 1978  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2033  ax-13 2233  ax-ext 2589  ax-sep 4703  ax-nul 4712  ax-pow 4764  ax-pr 4828  ax-un 6824
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3or 1031  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2461  df-mo 2462  df-clab 2596  df-cleq 2602  df-clel 2605  df-nfc 2739  df-ne 2781  df-ral 2900  df-rex 2901  df-reu 2902  df-rab 2904  df-v 3174  df-sbc 3402  df-csb 3499  df-dif 3542  df-un 3544  df-in 3546  df-ss 3553  df-pss 3555  df-nul 3874  df-if 4036  df-pw 4109  df-sn 4125  df-pr 4127  df-tp 4129  df-op 4131  df-uni 4367  df-iun 4451  df-br 4578  df-opab 4638  df-mpt 4639  df-tr 4675  df-eprel 4939  df-id 4943  df-po 4949  df-so 4950  df-fr 4987  df-we 4989  df-xp 5034  df-rel 5035  df-cnv 5036  df-co 5037  df-dm 5038  df-rn 5039  df-res 5040  df-ima 5041  df-pred 5583  df-ord 5629  df-on 5630  df-lim 5631  df-suc 5632  df-iota 5754  df-fun 5792  df-fn 5793  df-f 5794  df-f1 5795  df-fo 5796  df-f1o 5797  df-fv 5798  df-wrecs 7271  df-recs 7332
This theorem is referenced by:  tfr1a  7354
  Copyright terms: Public domain W3C validator