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 34796
Description: Lemma for exrecfn 34797. (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 8046 . . 3 (𝐴𝑉 → (rec(𝐹, 𝐴)‘∅) = 𝐴)
2 peano1 7581 . . . 4 ∅ ∈ ω
3 omelon 9093 . . . . 5 ω ∈ On
4 limom 7575 . . . . 5 Lim ω
5 rdglimss 34794 . . . . 5 (((ω ∈ On ∧ Lim ω) ∧ ∅ ∈ ω) → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
63, 4, 5mpanl12 701 . . . 4 (∅ ∈ ω → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
72, 6ax-mp 5 . . 3 (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω)
81, 7eqsstrrdi 3970 . 2 (𝐴𝑉𝐴 ⊆ (rec(𝐹, 𝐴)‘ω))
9 rdglim2a 8052 . . . . . . . 8 ((ω ∈ On ∧ Lim ω) → (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
103, 4, 9mp2an 691 . . . . . . 7 (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢)
1110eleq2i 2881 . . . . . 6 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ 𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
12 eliun 4885 . . . . . 6 (𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
1311, 12bitri 278 . . . . 5 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
14 peano2 7582 . . . . . . . . 9 (𝑢 ∈ ω → suc 𝑢 ∈ ω)
15 nnon 7566 . . . . . . . . . 10 (𝑢 ∈ ω → 𝑢 ∈ On)
16 eqid 2798 . . . . . . . . . . . . 13 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
1716elrnmpt1 5794 . . . . . . . . . . . 12 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
18 elun2 4104 . . . . . . . . . . . 12 (𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
1917, 18syl 17 . . . . . . . . . . 11 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
20 fvex 6658 . . . . . . . . . . . . . 14 (rec(𝐹, 𝐴)‘𝑢) ∈ V
21 exrecfnlem.1 . . . . . . . . . . . . . . . . . . . 20 𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
22 nfcv 2955 . . . . . . . . . . . . . . . . . . . . 21 𝑦V
23 nfcv 2955 . . . . . . . . . . . . . . . . . . . . . 22 𝑦𝑧
24 nfmpt1 5128 . . . . . . . . . . . . . . . . . . . . . . 23 𝑦(𝑦𝑧𝐵)
2524nfrn 5788 . . . . . . . . . . . . . . . . . . . . . 22 𝑦ran (𝑦𝑧𝐵)
2623, 25nfun 4092 . . . . . . . . . . . . . . . . . . . . 21 𝑦(𝑧 ∪ ran (𝑦𝑧𝐵))
2722, 26nfmpt 5127 . . . . . . . . . . . . . . . . . . . 20 𝑦(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
2821, 27nfcxfr 2953 . . . . . . . . . . . . . . . . . . 19 𝑦𝐹
29 nfcv 2955 . . . . . . . . . . . . . . . . . . 19 𝑦𝐴
3028, 29nfrdg 8033 . . . . . . . . . . . . . . . . . 18 𝑦rec(𝐹, 𝐴)
31 nfcv 2955 . . . . . . . . . . . . . . . . . 18 𝑦𝑢
3230, 31nffv 6655 . . . . . . . . . . . . . . . . 17 𝑦(rec(𝐹, 𝐴)‘𝑢)
3332mptexgf 6962 . . . . . . . . . . . . . . . 16 ((rec(𝐹, 𝐴)‘𝑢) ∈ V → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V)
3420, 33ax-mp 5 . . . . . . . . . . . . . . 15 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3534rnex 7599 . . . . . . . . . . . . . 14 ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3620, 35unex 7449 . . . . . . . . . . . . 13 ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V
37 nfcv 2955 . . . . . . . . . . . . . 14 𝑧𝐴
38 nfcv 2955 . . . . . . . . . . . . . 14 𝑧𝑢
39 nfmpt1 5128 . . . . . . . . . . . . . . . . . 18 𝑧(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
4021, 39nfcxfr 2953 . . . . . . . . . . . . . . . . 17 𝑧𝐹
4140, 37nfrdg 8033 . . . . . . . . . . . . . . . 16 𝑧rec(𝐹, 𝐴)
4241, 38nffv 6655 . . . . . . . . . . . . . . 15 𝑧(rec(𝐹, 𝐴)‘𝑢)
43 nfcv 2955 . . . . . . . . . . . . . . . . 17 𝑧𝐵
4442, 43nfmpt 5127 . . . . . . . . . . . . . . . 16 𝑧(𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4544nfrn 5788 . . . . . . . . . . . . . . 15 𝑧ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4642, 45nfun 4092 . . . . . . . . . . . . . 14 𝑧((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
47 rdgeq1 8030 . . . . . . . . . . . . . . 15 (𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))) → rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴))
4821, 47ax-mp 5 . . . . . . . . . . . . . 14 rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴)
49 id 22 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝑧 = (rec(𝐹, 𝐴)‘𝑢))
5032nfeq2 2972 . . . . . . . . . . . . . . . . 17 𝑦 𝑧 = (rec(𝐹, 𝐴)‘𝑢)
51 eqidd 2799 . . . . . . . . . . . . . . . . 17 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝐵 = 𝐵)
5250, 49, 51mpteq12df 5112 . . . . . . . . . . . . . . . 16 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑦𝑧𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5352rneqd 5772 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → ran (𝑦𝑧𝐵) = ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5449, 53uneq12d 4091 . . . . . . . . . . . . . 14 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑧 ∪ ran (𝑦𝑧𝐵)) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5537, 38, 46, 48, 54rdgsucmptf 8047 . . . . . . . . . . . . 13 ((𝑢 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5636, 55mpan2 690 . . . . . . . . . . . 12 (𝑢 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5756eleq2d 2875 . . . . . . . . . . 11 (𝑢 ∈ On → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) ↔ 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))))
5819, 57syl5ibr 249 . . . . . . . . . 10 (𝑢 ∈ On → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
5915, 58syl 17 . . . . . . . . 9 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
60 rdgellim 34793 . . . . . . . . . 10 (((ω ∈ On ∧ Lim ω) ∧ suc 𝑢 ∈ ω) → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
613, 4, 60mpanl12 701 . . . . . . . . 9 (suc 𝑢 ∈ ω → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6214, 59, 61sylsyld 61 . . . . . . . 8 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6362expd 419 . . . . . . 7 (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → (𝐵𝑊𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6463com3r 87 . . . . . 6 (𝐵𝑊 → (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6564rexlimdv 3242 . . . . 5 (𝐵𝑊 → (∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6613, 65syl5bi 245 . . . 4 (𝐵𝑊 → (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6766alimi 1813 . . 3 (∀𝑦 𝐵𝑊 → ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
68 df-ral 3111 . . 3 (∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6967, 68sylibr 237 . 2 (∀𝑦 𝐵𝑊 → ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))
70 fvex 6658 . . 3 (rec(𝐹, 𝐴)‘ω) ∈ V
71 sseq2 3941 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐴𝑥𝐴 ⊆ (rec(𝐹, 𝐴)‘ω)))
72 nfcv 2955 . . . . . . . 8 𝑦ω
7330, 72nffv 6655 . . . . . . 7 𝑦(rec(𝐹, 𝐴)‘ω)
7473nfeq2 2972 . . . . . 6 𝑦 𝑥 = (rec(𝐹, 𝐴)‘ω)
75 eleq2 2878 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝑦𝑥𝑦 ∈ (rec(𝐹, 𝐴)‘ω)))
76 eleq2 2878 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐵𝑥𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
7775, 76imbi12d 348 . . . . . 6 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝑦𝑥𝐵𝑥) ↔ (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
7874, 77albid 2222 . . . . 5 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦(𝑦𝑥𝐵𝑥) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
79 df-ral 3111 . . . . 5 (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦(𝑦𝑥𝐵𝑥))
8078, 79, 683bitr4g 317 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
8171, 80anbi12d 633 . . 3 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥) ↔ (𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
8270, 81spcev 3555 . 2 ((𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
838, 69, 82syl2an 598 1 ((𝐴𝑉 ∧ ∀𝑦 𝐵𝑊) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  wal 1536   = wceq 1538  wex 1781  wcel 2111  wral 3106  wrex 3107  Vcvv 3441  cun 3879  wss 3881  c0 4243   ciun 4881  cmpt 5110  ran crn 5520  Oncon0 6159  Lim wlim 6160  suc csuc 6161  cfv 6324  ωcom 7560  reccrdg 8028
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441  ax-inf2 9088
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-ral 3111  df-rex 3112  df-reu 3113  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4801  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  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 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-om 7561  df-wrecs 7930  df-recs 7991  df-rdg 8029
This theorem is referenced by:  exrecfn  34797
  Copyright terms: Public domain W3C validator