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 37741
Description: Lemma for exrecfn 37742. (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 8356 . . 3 (𝐴𝑉 → (rec(𝐹, 𝐴)‘∅) = 𝐴)
2 peano1 7829 . . . 4 ∅ ∈ ω
3 omelon 9558 . . . . 5 ω ∈ On
4 limom 7822 . . . . 5 Lim ω
5 rdglimss 37739 . . . . 5 (((ω ∈ On ∧ Lim ω) ∧ ∅ ∈ ω) → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
63, 4, 5mpanl12 708 . . . 4 (∅ ∈ ω → (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω))
72, 6ax-mp 5 . . 3 (rec(𝐹, 𝐴)‘∅) ⊆ (rec(𝐹, 𝐴)‘ω)
81, 7eqsstrrdi 3960 . 2 (𝐴𝑉𝐴 ⊆ (rec(𝐹, 𝐴)‘ω))
9 rdglim2a 8362 . . . . . . . 8 ((ω ∈ On ∧ Lim ω) → (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
103, 4, 9mp2an 698 . . . . . . 7 (rec(𝐹, 𝐴)‘ω) = 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢)
1110eleq2i 2831 . . . . . 6 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ 𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢))
12 eliun 4925 . . . . . 6 (𝑦 𝑢 ∈ ω (rec(𝐹, 𝐴)‘𝑢) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
1311, 12bitri 276 . . . . 5 (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢))
14 peano2 7830 . . . . . . . . 9 (𝑢 ∈ ω → suc 𝑢 ∈ ω)
15 nnon 7812 . . . . . . . . . 10 (𝑢 ∈ ω → 𝑢 ∈ On)
16 eqid 2739 . . . . . . . . . . . . 13 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
1716elrnmpt1 5902 . . . . . . . . . . . 12 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
18 elun2 4112 . . . . . . . . . . . 12 (𝐵 ∈ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
1917, 18syl 17 . . . . . . . . . . 11 ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
20 fvex 6840 . . . . . . . . . . . . . 14 (rec(𝐹, 𝐴)‘𝑢) ∈ V
21 exrecfnlem.1 . . . . . . . . . . . . . . . . . . . 20 𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
22 nfcv 2901 . . . . . . . . . . . . . . . . . . . . 21 𝑦V
23 nfcv 2901 . . . . . . . . . . . . . . . . . . . . . 22 𝑦𝑧
24 nfmpt1 5171 . . . . . . . . . . . . . . . . . . . . . . 23 𝑦(𝑦𝑧𝐵)
2524nfrn 5894 . . . . . . . . . . . . . . . . . . . . . 22 𝑦ran (𝑦𝑧𝐵)
2623, 25nfun 4100 . . . . . . . . . . . . . . . . . . . . 21 𝑦(𝑧 ∪ ran (𝑦𝑧𝐵))
2722, 26nfmpt 5170 . . . . . . . . . . . . . . . . . . . 20 𝑦(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
2821, 27nfcxfr 2899 . . . . . . . . . . . . . . . . . . 19 𝑦𝐹
29 nfcv 2901 . . . . . . . . . . . . . . . . . . 19 𝑦𝐴
3028, 29nfrdg 8343 . . . . . . . . . . . . . . . . . 18 𝑦rec(𝐹, 𝐴)
31 nfcv 2901 . . . . . . . . . . . . . . . . . 18 𝑦𝑢
3230, 31nffv 6837 . . . . . . . . . . . . . . . . 17 𝑦(rec(𝐹, 𝐴)‘𝑢)
3332mptexgf 7166 . . . . . . . . . . . . . . . 16 ((rec(𝐹, 𝐴)‘𝑢) ∈ V → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V)
3420, 33ax-mp 5 . . . . . . . . . . . . . . 15 (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3534rnex 7850 . . . . . . . . . . . . . 14 ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵) ∈ V
3620, 35unex 7687 . . . . . . . . . . . . 13 ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V
37 nfcv 2901 . . . . . . . . . . . . . 14 𝑧𝐴
38 nfcv 2901 . . . . . . . . . . . . . 14 𝑧𝑢
39 nfmpt1 5171 . . . . . . . . . . . . . . . . . 18 𝑧(𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵)))
4021, 39nfcxfr 2899 . . . . . . . . . . . . . . . . 17 𝑧𝐹
4140, 37nfrdg 8343 . . . . . . . . . . . . . . . 16 𝑧rec(𝐹, 𝐴)
4241, 38nffv 6837 . . . . . . . . . . . . . . 15 𝑧(rec(𝐹, 𝐴)‘𝑢)
43 nfcv 2901 . . . . . . . . . . . . . . . . 17 𝑧𝐵
4442, 43nfmpt 5170 . . . . . . . . . . . . . . . 16 𝑧(𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4544nfrn 5894 . . . . . . . . . . . . . . 15 𝑧ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)
4642, 45nfun 4100 . . . . . . . . . . . . . 14 𝑧((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
47 rdgeq1 8340 . . . . . . . . . . . . . . 15 (𝐹 = (𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))) → rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴))
4821, 47ax-mp 5 . . . . . . . . . . . . . 14 rec(𝐹, 𝐴) = rec((𝑧 ∈ V ↦ (𝑧 ∪ ran (𝑦𝑧𝐵))), 𝐴)
49 id 22 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝑧 = (rec(𝐹, 𝐴)‘𝑢))
5032nfeq2 2918 . . . . . . . . . . . . . . . . 17 𝑦 𝑧 = (rec(𝐹, 𝐴)‘𝑢)
51 eqidd 2740 . . . . . . . . . . . . . . . . 17 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → 𝐵 = 𝐵)
5250, 49, 51mpteq12df 5156 . . . . . . . . . . . . . . . 16 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑦𝑧𝐵) = (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5352rneqd 5880 . . . . . . . . . . . . . . 15 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → ran (𝑦𝑧𝐵) = ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))
5449, 53uneq12d 4099 . . . . . . . . . . . . . 14 (𝑧 = (rec(𝐹, 𝐴)‘𝑢) → (𝑧 ∪ ran (𝑦𝑧𝐵)) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5537, 38, 46, 48, 54rdgsucmptf 8357 . . . . . . . . . . . . 13 ((𝑢 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5636, 55mpan2 697 . . . . . . . . . . . 12 (𝑢 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑢) = ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵)))
5756eleq2d 2825 . . . . . . . . . . 11 (𝑢 ∈ On → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) ↔ 𝐵 ∈ ((rec(𝐹, 𝐴)‘𝑢) ∪ ran (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ↦ 𝐵))))
5819, 57imbitrrid 247 . . . . . . . . . 10 (𝑢 ∈ On → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
5915, 58syl 17 . . . . . . . . 9 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢)))
60 rdgellim 37738 . . . . . . . . . 10 (((ω ∈ On ∧ Lim ω) ∧ suc 𝑢 ∈ ω) → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
613, 4, 60mpanl12 708 . . . . . . . . 9 (suc 𝑢 ∈ ω → (𝐵 ∈ (rec(𝐹, 𝐴)‘suc 𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6214, 59, 61sylsyld 61 . . . . . . . 8 (𝑢 ∈ ω → ((𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) ∧ 𝐵𝑊) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6362expd 416 . . . . . . 7 (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → (𝐵𝑊𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6463com3r 87 . . . . . 6 (𝐵𝑊 → (𝑢 ∈ ω → (𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
6564rexlimdv 3138 . . . . 5 (𝐵𝑊 → (∃𝑢 ∈ ω 𝑦 ∈ (rec(𝐹, 𝐴)‘𝑢) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6613, 65biimtrid 243 . . . 4 (𝐵𝑊 → (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6766alimi 1818 . . 3 (∀𝑦 𝐵𝑊 → ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
6867ralrid 3061 . 2 (∀𝑦 𝐵𝑊 → ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))
69 fvex 6840 . . 3 (rec(𝐹, 𝐴)‘ω) ∈ V
70 sseq2 3941 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐴𝑥𝐴 ⊆ (rec(𝐹, 𝐴)‘ω)))
71 nfcv 2901 . . . . . . . 8 𝑦ω
7230, 71nffv 6837 . . . . . . 7 𝑦(rec(𝐹, 𝐴)‘ω)
7372nfeq2 2918 . . . . . 6 𝑦 𝑥 = (rec(𝐹, 𝐴)‘ω)
74 eleq2 2828 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝑦𝑥𝑦 ∈ (rec(𝐹, 𝐴)‘ω)))
75 eleq2 2828 . . . . . . 7 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (𝐵𝑥𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
7674, 75imbi12d 345 . . . . . 6 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝑦𝑥𝐵𝑥) ↔ (𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
7773, 76albid 2234 . . . . 5 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦(𝑦𝑥𝐵𝑥) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
78 df-ral 3054 . . . . 5 (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦(𝑦𝑥𝐵𝑥))
79 df-ral 3054 . . . . 5 (∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω) ↔ ∀𝑦(𝑦 ∈ (rec(𝐹, 𝐴)‘ω) → 𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
8077, 78, 793bitr4g 315 . . . 4 (𝑥 = (rec(𝐹, 𝐴)‘ω) → (∀𝑦𝑥 𝐵𝑥 ↔ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)))
8170, 80anbi12d 638 . . 3 (𝑥 = (rec(𝐹, 𝐴)‘ω) → ((𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥) ↔ (𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω))))
8269, 81spcev 3544 . 2 ((𝐴 ⊆ (rec(𝐹, 𝐴)‘ω) ∧ ∀𝑦 ∈ (rec(𝐹, 𝐴)‘ω)𝐵 ∈ (rec(𝐹, 𝐴)‘ω)) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
838, 68, 82syl2an 602 1 ((𝐴𝑉 ∧ ∀𝑦 𝐵𝑊) → ∃𝑥(𝐴𝑥 ∧ ∀𝑦𝑥 𝐵𝑥))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  wal 1545   = wceq 1547  wex 1786  wcel 2119  wral 3053  wrex 3063  Vcvv 3431  cun 3881  wss 3883  c0 4261   ciun 4921  cmpt 5153  ran crn 5619  Oncon0 6310  Lim wlim 6311  suc csuc 6312  cfv 6485  ωcom 7806  reccrdg 8338
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 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pr 5362  ax-un 7678  ax-inf2 9553
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-ral 3054  df-rex 3064  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-ov 7359  df-om 7807  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339
This theorem is referenced by:  exrecfn  37742
  Copyright terms: Public domain W3C validator