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

Theorem axdclem2 10517
Description: Lemma for axdc 10518. Using the full Axiom of Choice, we can construct a choice function 𝑔 on 𝒫 dom 𝑥. From this, we can build a sequence 𝐹 starting at any value 𝑠 ∈ dom 𝑥 by repeatedly applying 𝑔 to the set (𝐹𝑥) (where 𝑥 is the value from the previous iteration). (Contributed by Mario Carneiro, 25-Jan-2013.)
Hypothesis
Ref Expression
axdclem2.1 𝐹 = (rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω)
Assertion
Ref Expression
axdclem2 (∃𝑧 𝑠𝑥𝑧 → (ran 𝑥 ⊆ dom 𝑥 → ∃𝑓𝑛 ∈ ω (𝑓𝑛)𝑥(𝑓‘suc 𝑛)))
Distinct variable groups:   𝑓,𝐹,𝑛   𝑦,𝐹,𝑧,𝑛   𝑓,𝑔,𝑥,𝑛   𝑔,𝑠,𝑦,𝑛   𝑧,𝑔   𝑥,𝑦,𝑧
Allowed substitution hints:   𝐹(𝑥,𝑔,𝑠)

Proof of Theorem axdclem2
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 frfnom 8437 . . . . . . 7 (rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω) Fn ω
2 axdclem2.1 . . . . . . . 8 𝐹 = (rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω)
32fneq1i 6645 . . . . . . 7 (𝐹 Fn ω ↔ (rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω) Fn ω)
41, 3mpbir 230 . . . . . 6 𝐹 Fn ω
54a1i 11 . . . . 5 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → 𝐹 Fn ω)
6 omex 9640 . . . . . 6 ω ∈ V
76a1i 11 . . . . 5 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → ω ∈ V)
85, 7fnexd 7221 . . . 4 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → 𝐹 ∈ V)
9 fveq2 6890 . . . . . . . 8 (𝑛 = ∅ → (𝐹𝑛) = (𝐹‘∅))
10 suceq 6429 . . . . . . . . 9 (𝑛 = ∅ → suc 𝑛 = suc ∅)
1110fveq2d 6894 . . . . . . . 8 (𝑛 = ∅ → (𝐹‘suc 𝑛) = (𝐹‘suc ∅))
129, 11breq12d 5160 . . . . . . 7 (𝑛 = ∅ → ((𝐹𝑛)𝑥(𝐹‘suc 𝑛) ↔ (𝐹‘∅)𝑥(𝐹‘suc ∅)))
13 fveq2 6890 . . . . . . . 8 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
14 suceq 6429 . . . . . . . . 9 (𝑛 = 𝑘 → suc 𝑛 = suc 𝑘)
1514fveq2d 6894 . . . . . . . 8 (𝑛 = 𝑘 → (𝐹‘suc 𝑛) = (𝐹‘suc 𝑘))
1613, 15breq12d 5160 . . . . . . 7 (𝑛 = 𝑘 → ((𝐹𝑛)𝑥(𝐹‘suc 𝑛) ↔ (𝐹𝑘)𝑥(𝐹‘suc 𝑘)))
17 fveq2 6890 . . . . . . . 8 (𝑛 = suc 𝑘 → (𝐹𝑛) = (𝐹‘suc 𝑘))
18 suceq 6429 . . . . . . . . 9 (𝑛 = suc 𝑘 → suc 𝑛 = suc suc 𝑘)
1918fveq2d 6894 . . . . . . . 8 (𝑛 = suc 𝑘 → (𝐹‘suc 𝑛) = (𝐹‘suc suc 𝑘))
2017, 19breq12d 5160 . . . . . . 7 (𝑛 = suc 𝑘 → ((𝐹𝑛)𝑥(𝐹‘suc 𝑛) ↔ (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
212fveq1i 6891 . . . . . . . . . . . . 13 (𝐹‘∅) = ((rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω)‘∅)
22 fr0g 8438 . . . . . . . . . . . . . 14 (𝑠 ∈ V → ((rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω)‘∅) = 𝑠)
2322elv 3478 . . . . . . . . . . . . 13 ((rec((𝑦 ∈ V ↦ (𝑔‘{𝑧𝑦𝑥𝑧})), 𝑠) ↾ ω)‘∅) = 𝑠
2421, 23eqtri 2758 . . . . . . . . . . . 12 (𝐹‘∅) = 𝑠
2524breq1i 5154 . . . . . . . . . . 11 ((𝐹‘∅)𝑥𝑧𝑠𝑥𝑧)
2625biimpri 227 . . . . . . . . . 10 (𝑠𝑥𝑧 → (𝐹‘∅)𝑥𝑧)
2726eximi 1835 . . . . . . . . 9 (∃𝑧 𝑠𝑥𝑧 → ∃𝑧(𝐹‘∅)𝑥𝑧)
28 peano1 7881 . . . . . . . . . 10 ∅ ∈ ω
292axdclem 10516 . . . . . . . . . 10 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥 ∧ ∃𝑧(𝐹‘∅)𝑥𝑧) → (∅ ∈ ω → (𝐹‘∅)𝑥(𝐹‘suc ∅)))
3028, 29mpi 20 . . . . . . . . 9 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥 ∧ ∃𝑧(𝐹‘∅)𝑥𝑧) → (𝐹‘∅)𝑥(𝐹‘suc ∅))
3127, 30syl3an3 1163 . . . . . . . 8 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥 ∧ ∃𝑧 𝑠𝑥𝑧) → (𝐹‘∅)𝑥(𝐹‘suc ∅))
32313com23 1124 . . . . . . 7 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → (𝐹‘∅)𝑥(𝐹‘suc ∅))
33 fvex 6903 . . . . . . . . . . . . . 14 (𝐹𝑘) ∈ V
34 fvex 6903 . . . . . . . . . . . . . 14 (𝐹‘suc 𝑘) ∈ V
3533, 34brelrn 5940 . . . . . . . . . . . . 13 ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → (𝐹‘suc 𝑘) ∈ ran 𝑥)
36 ssel 3974 . . . . . . . . . . . . 13 (ran 𝑥 ⊆ dom 𝑥 → ((𝐹‘suc 𝑘) ∈ ran 𝑥 → (𝐹‘suc 𝑘) ∈ dom 𝑥))
3735, 36syl5 34 . . . . . . . . . . . 12 (ran 𝑥 ⊆ dom 𝑥 → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → (𝐹‘suc 𝑘) ∈ dom 𝑥))
3834eldm 5899 . . . . . . . . . . . 12 ((𝐹‘suc 𝑘) ∈ dom 𝑥 ↔ ∃𝑧(𝐹‘suc 𝑘)𝑥𝑧)
3937, 38imbitrdi 250 . . . . . . . . . . 11 (ran 𝑥 ⊆ dom 𝑥 → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → ∃𝑧(𝐹‘suc 𝑘)𝑥𝑧))
4039ad2antll 725 . . . . . . . . . 10 ((𝑘 ∈ ω ∧ (∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥)) → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → ∃𝑧(𝐹‘suc 𝑘)𝑥𝑧))
41 peano2 7883 . . . . . . . . . . . . . 14 (𝑘 ∈ ω → suc 𝑘 ∈ ω)
422axdclem 10516 . . . . . . . . . . . . . 14 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥 ∧ ∃𝑧(𝐹‘suc 𝑘)𝑥𝑧) → (suc 𝑘 ∈ ω → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
4341, 42syl5 34 . . . . . . . . . . . . 13 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥 ∧ ∃𝑧(𝐹‘suc 𝑘)𝑥𝑧) → (𝑘 ∈ ω → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
44433expia 1119 . . . . . . . . . . . 12 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥) → (∃𝑧(𝐹‘suc 𝑘)𝑥𝑧 → (𝑘 ∈ ω → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘))))
4544com3r 87 . . . . . . . . . . 11 (𝑘 ∈ ω → ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥) → (∃𝑧(𝐹‘suc 𝑘)𝑥𝑧 → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘))))
4645imp 405 . . . . . . . . . 10 ((𝑘 ∈ ω ∧ (∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥)) → (∃𝑧(𝐹‘suc 𝑘)𝑥𝑧 → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
4740, 46syld 47 . . . . . . . . 9 ((𝑘 ∈ ω ∧ (∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ran 𝑥 ⊆ dom 𝑥)) → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
48473adantr2 1168 . . . . . . . 8 ((𝑘 ∈ ω ∧ (∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥)) → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘)))
4948ex 411 . . . . . . 7 (𝑘 ∈ ω → ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → ((𝐹𝑘)𝑥(𝐹‘suc 𝑘) → (𝐹‘suc 𝑘)𝑥(𝐹‘suc suc 𝑘))))
5012, 16, 20, 32, 49finds2 7893 . . . . . 6 (𝑛 ∈ ω → ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → (𝐹𝑛)𝑥(𝐹‘suc 𝑛)))
5150com12 32 . . . . 5 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → (𝑛 ∈ ω → (𝐹𝑛)𝑥(𝐹‘suc 𝑛)))
5251ralrimiv 3143 . . . 4 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → ∀𝑛 ∈ ω (𝐹𝑛)𝑥(𝐹‘suc 𝑛))
53 fveq1 6889 . . . . . 6 (𝑓 = 𝐹 → (𝑓𝑛) = (𝐹𝑛))
54 fveq1 6889 . . . . . 6 (𝑓 = 𝐹 → (𝑓‘suc 𝑛) = (𝐹‘suc 𝑛))
5553, 54breq12d 5160 . . . . 5 (𝑓 = 𝐹 → ((𝑓𝑛)𝑥(𝑓‘suc 𝑛) ↔ (𝐹𝑛)𝑥(𝐹‘suc 𝑛)))
5655ralbidv 3175 . . . 4 (𝑓 = 𝐹 → (∀𝑛 ∈ ω (𝑓𝑛)𝑥(𝑓‘suc 𝑛) ↔ ∀𝑛 ∈ ω (𝐹𝑛)𝑥(𝐹‘suc 𝑛)))
578, 52, 56spcedv 3587 . . 3 ((∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) ∧ ∃𝑧 𝑠𝑥𝑧 ∧ ran 𝑥 ⊆ dom 𝑥) → ∃𝑓𝑛 ∈ ω (𝑓𝑛)𝑥(𝑓‘suc 𝑛))
58573exp 1117 . 2 (∀𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦) → (∃𝑧 𝑠𝑥𝑧 → (ran 𝑥 ⊆ dom 𝑥 → ∃𝑓𝑛 ∈ ω (𝑓𝑛)𝑥(𝑓‘suc 𝑛))))
59 vex 3476 . . . . 5 𝑥 ∈ V
6059dmex 7904 . . . 4 dom 𝑥 ∈ V
6160pwex 5377 . . 3 𝒫 dom 𝑥 ∈ V
6261ac4c 10473 . 2 𝑔𝑦 ∈ 𝒫 dom 𝑥(𝑦 ≠ ∅ → (𝑔𝑦) ∈ 𝑦)
6358, 62exlimiiv 1932 1 (∃𝑧 𝑠𝑥𝑧 → (ran 𝑥 ⊆ dom 𝑥 → ∃𝑓𝑛 ∈ ω (𝑓𝑛)𝑥(𝑓‘suc 𝑛)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 394  w3a 1085   = wceq 1539  wex 1779  wcel 2104  {cab 2707  wne 2938  wral 3059  Vcvv 3472  wss 3947  c0 4321  𝒫 cpw 4601   class class class wbr 5147  cmpt 5230  dom cdm 5675  ran crn 5676  cres 5677  suc csuc 6365   Fn wfn 6537  cfv 6542  ωcom 7857  reccrdg 8411
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7727  ax-inf2 9638  ax-ac2 10460
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-ral 3060  df-rex 3069  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-ov 7414  df-om 7858  df-2nd 7978  df-frecs 8268  df-wrecs 8299  df-recs 8373  df-rdg 8412  df-ac 10113
This theorem is referenced by:  axdc  10518
  Copyright terms: Public domain W3C validator