Users' Mathboxes Mathbox for ML < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  exrecfnlem Structured version   Visualization version   GIF version

Theorem exrecfnlem 36249
Description: Lemma for exrecfn 36250. (Contributed by ML, 30-Mar-2022.)
Hypothesis
Ref Expression
exrecfnlem.1 𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
Assertion
Ref Expression
exrecfnlem ((𝐴𝑉 ∧ ∀𝑦 𝐵𝑊) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
Distinct variable groups:   𝑦,𝐴,𝑧,𝑥   𝑥,𝐵,𝑧   𝑥,𝐹   𝑦,𝑊
Allowed substitution hints:   𝐵(𝑦)   𝐹(𝑦,𝑧)   𝑉(𝑥,𝑦,𝑧)   𝑊(𝑥,𝑧)

Proof of Theorem exrecfnlem
Dummy variable 𝑢 is distinct from all other variables.
StepHypRef Expression
1 rdg0g 8424 . . 3 (𝐴𝑉 → (rec(𝐹, 𝐴)‘∅) = 𝐴)
2 peano1 7876 . . . 4 ∅ ∈ ω
3 omelon 9638 . . . . 5 ω ∈ On
4 limom 7868 . . . . 5 Lim ω
5 rdglimss 36247 . . . . 5 (((ω ∈ On ∧ Lim ω) ∧ ∅ ∈ ω) → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
63, 4, 5mpanl12 701 . . . 4 (∅ ∈ ω → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
72, 6ax-mp 5 . . 3 (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω)
81, 7eqsstrrdi 4037 . 2 (𝐴𝑉𝐴 ⊆ (rec(𝐹, 𝐴)‘ω))
9 rdglim2a 8430 . . . . . . . 8 ((ω ∈ On ∧ Lim ω) → (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
103, 4, 9mp2an 691 . . . . . . 7 (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢)
1110eleq2i 2826 . . . . . 6 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ 𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
12 eliun 5001 . . . . . 6 (𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
1311, 12bitri 275 . . . . 5 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
14 peano2 7878 . . . . . . . . 9 (𝑢 ∈ ω → suc 𝑢 ∈ ω)
15 nnon 7858 . . . . . . . . . 10 (𝑢 ∈ ω → 𝑢 ∈ On)
16 eqid 2733 . . . . . . . . . . . . 13 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
1716elrnmpt1 5956 . . . . . . . . . . . 12 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
18 elun2 4177 . . . . . . . . . . . 12 (𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
1917, 18syl 17 . . . . . . . . . . 11 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
20 fvex 6902 . . . . . . . . . . . . . 14 (rec(𝐹, 𝐴)‘𝑢) ∈ V
21 exrecfnlem.1 . . . . . . . . . . . . . . . . . . . 20 𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
22 nfcv 2904 . . . . . . . . . . . . . . . . . . . . 21 𝑦V
23 nfcv 2904 . . . . . . . . . . . . . . . . . . . . . 22 𝑦𝑧
24 nfmpt1 5256 . . . . . . . . . . . . . . . . . . . . . . 23 𝑦(𝑦𝑧𝐵)
2524nfrn 5950 . . . . . . . . . . . . . . . . . . . . . 22 𝑦ran (𝑦𝑧𝐵)
2623, 25nfun 4165 . . . . . . . . . . . . . . . . . . . . 21 𝑦(𝑧 ∪ ran (𝑦𝑧𝐵))
2722, 26nfmpt 5255 . . . . . . . . . . . . . . . . . . . 20 𝑦(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
2821, 27nfcxfr 2902 . . . . . . . . . . . . . . . . . . 19 𝑦𝐹
29 nfcv 2904 . . . . . . . . . . . . . . . . . . 19 𝑦𝐴
3028, 29nfrdg 8411 . . . . . . . . . . . . . . . . . 18 𝑦rec(𝐹, 𝐴)
31 nfcv 2904 . . . . . . . . . . . . . . . . . 18 𝑦𝑢
3230, 31nffv 6899 . . . . . . . . . . . . . . . . 17 𝑦(rec(𝐹, 𝐴)‘𝑢)
3332mptexgf 7221 . . . . . . . . . . . . . . . 16 ((rec(𝐹, 𝐴)‘𝑢) ∈ V → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V)
3420, 33ax-mp 5 . . . . . . . . . . . . . . 15 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3534rnex 7900 . . . . . . . . . . . . . 14 ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3620, 35unex 7730 . . . . . . . . . . . . 13 ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V
37 nfcv 2904 . . . . . . . . . . . . . 14 𝑧𝐴
38 nfcv 2904 . . . . . . . . . . . . . 14 𝑧𝑢
39 nfmpt1 5256 . . . . . . . . . . . . . . . . . 18 𝑧(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
4021, 39nfcxfr 2902 . . . . . . . . . . . . . . . . 17 𝑧𝐹
4140, 37nfrdg 8411 . . . . . . . . . . . . . . . 16 𝑧rec(𝐹, 𝐴)
4241, 38nffv 6899 . . . . . . . . . . . . . . 15 𝑧(rec(𝐹, 𝐴)‘𝑢)
43 nfcv 2904 . . . . . . . . . . . . . . . . 17 𝑧𝐵
4442, 43nfmpt 5255 . . . . . . . . . . . . . . . 16 𝑧(𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4544nfrn 5950 . . . . . . . . . . . . . . 15 𝑧ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4642, 45nfun 4165 . . . . . . . . . . . . . 14 𝑧((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
47 rdgeq1 8408 . . . . . . . . . . . . . . 15 (𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))) → rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴))
4821, 47ax-mp 5 . . . . . . . . . . . . . 14 rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴)
49 id 22 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝑧 = (rec(𝐹, 𝐴)‘𝑢))
5032nfeq2 2921 . . . . . . . . . . . . . . . . 17 𝑦 𝑧 = (rec(𝐹, 𝐴)‘𝑢)
51 eqidd 2734 . . . . . . . . . . . . . . . . 17 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝐵 = 𝐵)
5250, 49, 51mpteq12df 5234 . . . . . . . . . . . . . . . 16 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑦𝑧𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5352rneqd 5936 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → ran (𝑦𝑧𝐵) = ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5449, 53uneq12d 4164 . . . . . . . . . . . . . 14 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑧 ∪ ran (𝑦𝑧𝐵)) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5537, 38, 46, 48, 54rdgsucmptf 8425 . . . . . . . . . . . . 13 ((𝑢 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5636, 55mpan2 690 . . . . . . . . . . . 12 (𝑢 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5756eleq2d 2820 . . . . . . . . . . 11 (𝑢 ∈ On → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) ↔ 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))))
5819, 57imbitrrid 245 . . . . . . . . . 10 (𝑢 ∈ On → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
5915, 58syl 17 . . . . . . . . 9 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
60 rdgellim 36246 . . . . . . . . . 10 (((ω ∈ On ∧ Lim ω) ∧ suc 𝑢 ∈ ω) → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
613, 4, 60mpanl12 701 . . . . . . . . 9 (suc 𝑢 ∈ ω → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6214, 59, 61sylsyld 61 . . . . . . . 8 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6362expd 417 . . . . . . 7 (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → (𝐵𝑊𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6463com3r 87 . . . . . 6 (𝐵𝑊 → (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6564rexlimdv 3154 . . . . 5 (𝐵𝑊 → (∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6613, 65biimtrid 241 . . . 4 (𝐵𝑊 → (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6766alimi 1814 . . 3 (∀𝑦 𝐵𝑊 → ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
68 df-ral 3063 . . 3 (∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6967, 68sylibr 233 . 2 (∀𝑦 𝐵𝑊 → ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))
70 fvex 6902 . . 3 (rec(𝐹, 𝐴)‘ω) ∈ V
71 sseq2 4008 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐴𝑥𝐴 ⊆ (rec(𝐹, 𝐴)‘ω)))
72 nfcv 2904 . . . . . . . 8 𝑦ω
7330, 72nffv 6899 . . . . . . 7 𝑦(rec(𝐹, 𝐴)‘ω)
7473nfeq2 2921 . . . . . 6 𝑦 𝑥 = (rec(𝐹, 𝐴)‘ω)
75 eleq2 2823 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝑦𝑥𝑦 ∈ (rec(𝐹, 𝐴)‘ω)))
76 eleq2 2823 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐵𝑥𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
7775, 76imbi12d 345 . . . . . 6 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝑦𝑥𝐵𝑥) ↔ (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
7874, 77albid 2216 . . . . 5 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦(𝑦𝑥𝐵𝑥) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
79 df-ral 3063 . . . . 5 (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦(𝑦𝑥𝐵𝑥))
8078, 79, 683bitr4g 314 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
8171, 80anbi12d 632 . . 3 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥) ↔ (𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
8270, 81spcev 3597 . 2 ((𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
838, 69, 82syl2an 597 1 ((𝐴𝑉 ∧ ∀𝑦 𝐵𝑊) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 397  wal 1540   = wceq 1542  wex 1782  wcel 2107  wral 3062  wrex 3071  Vcvv 3475  cun 3946  wss 3948  c0 4322   ciun 4997  cmpt 5231  ran crn 5677  Oncon0 6362  Lim wlim 6363  suc csuc 6364  cfv 6541  ωcom 7852  reccrdg 8406
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pr 5427  ax-un 7722  ax-inf2 9633
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-ov 7409  df-om 7853  df-2nd 7973  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407
This theorem is referenced by:  exrecfn  36250
  Copyright terms: Public domain W3C validator