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

Theorem pwfseqlem2 9519
Description: Lemma for pwfseq 9524. (Contributed by Mario Carneiro, 18-Nov-2014.) (Revised by AV, 18-Sep-2021.)
Hypotheses
Ref Expression
pwfseqlem4.g (𝜑𝐺:𝒫 𝐴1-1 𝑛 ∈ ω (𝐴𝑚 𝑛))
pwfseqlem4.x (𝜑𝑋𝐴)
pwfseqlem4.h (𝜑𝐻:ω–1-1-onto𝑋)
pwfseqlem4.ps (𝜓 ↔ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥) ∧ ω ≼ 𝑥))
pwfseqlem4.k ((𝜑𝜓) → 𝐾: 𝑛 ∈ ω (𝑥𝑚 𝑛)–1-1𝑥)
pwfseqlem4.d 𝐷 = (𝐺‘{𝑤𝑥 ∣ ((𝐾𝑤) ∈ ran 𝐺 ∧ ¬ 𝑤 ∈ (𝐺‘(𝐾𝑤)))})
pwfseqlem4.f 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})))
Assertion
Ref Expression
pwfseqlem2 ((𝑌 ∈ Fin ∧ 𝑅𝑉) → (𝑌𝐹𝑅) = (𝐻‘(card‘𝑌)))
Distinct variable groups:   𝑛,𝑟,𝑤,𝑥,𝑧   𝐷,𝑛,𝑧   𝑤,𝐺   𝑤,𝐾   𝐻,𝑟,𝑥,𝑧   𝜑,𝑛,𝑟,𝑥,𝑧   𝜓,𝑛,𝑧   𝐴,𝑛,𝑟,𝑥,𝑧   𝑉,𝑟,𝑥
Allowed substitution hints:   𝜑(𝑤)   𝜓(𝑥,𝑤,𝑟)   𝐴(𝑤)   𝐷(𝑥,𝑤,𝑟)   𝑅(𝑥,𝑧,𝑤,𝑛,𝑟)   𝐹(𝑥,𝑧,𝑤,𝑛,𝑟)   𝐺(𝑥,𝑧,𝑛,𝑟)   𝐻(𝑤,𝑛)   𝐾(𝑥,𝑧,𝑛,𝑟)   𝑉(𝑧,𝑤,𝑛)   𝑋(𝑥,𝑧,𝑤,𝑛,𝑟)   𝑌(𝑥,𝑧,𝑤,𝑛,𝑟)

Proof of Theorem pwfseqlem2
Dummy variables 𝑎 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq1 6697 . . 3 (𝑎 = 𝑌 → (𝑎𝐹𝑠) = (𝑌𝐹𝑠))
2 fveq2 6229 . . . 4 (𝑎 = 𝑌 → (card‘𝑎) = (card‘𝑌))
32fveq2d 6233 . . 3 (𝑎 = 𝑌 → (𝐻‘(card‘𝑎)) = (𝐻‘(card‘𝑌)))
41, 3eqeq12d 2666 . 2 (𝑎 = 𝑌 → ((𝑎𝐹𝑠) = (𝐻‘(card‘𝑎)) ↔ (𝑌𝐹𝑠) = (𝐻‘(card‘𝑌))))
5 oveq2 6698 . . 3 (𝑠 = 𝑅 → (𝑌𝐹𝑠) = (𝑌𝐹𝑅))
65eqeq1d 2653 . 2 (𝑠 = 𝑅 → ((𝑌𝐹𝑠) = (𝐻‘(card‘𝑌)) ↔ (𝑌𝐹𝑅) = (𝐻‘(card‘𝑌))))
7 nfcv 2793 . . 3 𝑥𝑎
8 nfcv 2793 . . 3 𝑟𝑎
9 nfcv 2793 . . 3 𝑟𝑠
10 pwfseqlem4.f . . . . . 6 𝐹 = (𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})))
11 nfmpt21 6764 . . . . . 6 𝑥(𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})))
1210, 11nfcxfr 2791 . . . . 5 𝑥𝐹
13 nfcv 2793 . . . . 5 𝑥𝑟
147, 12, 13nfov 6716 . . . 4 𝑥(𝑎𝐹𝑟)
1514nfeq1 2807 . . 3 𝑥(𝑎𝐹𝑟) = (𝐻‘(card‘𝑎))
16 nfmpt22 6765 . . . . . 6 𝑟(𝑥 ∈ V, 𝑟 ∈ V ↦ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})))
1710, 16nfcxfr 2791 . . . . 5 𝑟𝐹
188, 17, 9nfov 6716 . . . 4 𝑟(𝑎𝐹𝑠)
1918nfeq1 2807 . . 3 𝑟(𝑎𝐹𝑠) = (𝐻‘(card‘𝑎))
20 oveq1 6697 . . . 4 (𝑥 = 𝑎 → (𝑥𝐹𝑟) = (𝑎𝐹𝑟))
21 fveq2 6229 . . . . 5 (𝑥 = 𝑎 → (card‘𝑥) = (card‘𝑎))
2221fveq2d 6233 . . . 4 (𝑥 = 𝑎 → (𝐻‘(card‘𝑥)) = (𝐻‘(card‘𝑎)))
2320, 22eqeq12d 2666 . . 3 (𝑥 = 𝑎 → ((𝑥𝐹𝑟) = (𝐻‘(card‘𝑥)) ↔ (𝑎𝐹𝑟) = (𝐻‘(card‘𝑎))))
24 oveq2 6698 . . . 4 (𝑟 = 𝑠 → (𝑎𝐹𝑟) = (𝑎𝐹𝑠))
2524eqeq1d 2653 . . 3 (𝑟 = 𝑠 → ((𝑎𝐹𝑟) = (𝐻‘(card‘𝑎)) ↔ (𝑎𝐹𝑠) = (𝐻‘(card‘𝑎))))
26 vex 3234 . . . . . 6 𝑥 ∈ V
27 vex 3234 . . . . . 6 𝑟 ∈ V
28 fvex 6239 . . . . . . 7 (𝐻‘(card‘𝑥)) ∈ V
29 fvex 6239 . . . . . . 7 (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥}) ∈ V
3028, 29ifex 4189 . . . . . 6 if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})) ∈ V
3110ovmpt4g 6825 . . . . . 6 ((𝑥 ∈ V ∧ 𝑟 ∈ V ∧ if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})) ∈ V) → (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})))
3226, 27, 30, 31mp3an 1464 . . . . 5 (𝑥𝐹𝑟) = if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥}))
33 iftrue 4125 . . . . 5 (𝑥 ∈ Fin → if(𝑥 ∈ Fin, (𝐻‘(card‘𝑥)), (𝐷 {𝑧 ∈ ω ∣ ¬ (𝐷𝑧) ∈ 𝑥})) = (𝐻‘(card‘𝑥)))
3432, 33syl5eq 2697 . . . 4 (𝑥 ∈ Fin → (𝑥𝐹𝑟) = (𝐻‘(card‘𝑥)))
3534adantr 480 . . 3 ((𝑥 ∈ Fin ∧ 𝑟𝑉) → (𝑥𝐹𝑟) = (𝐻‘(card‘𝑥)))
367, 8, 9, 15, 19, 23, 25, 35vtocl2gaf 3304 . 2 ((𝑎 ∈ Fin ∧ 𝑠𝑉) → (𝑎𝐹𝑠) = (𝐻‘(card‘𝑎)))
374, 6, 36vtocl2ga 3305 1 ((𝑌 ∈ Fin ∧ 𝑅𝑉) → (𝑌𝐹𝑅) = (𝐻‘(card‘𝑌)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 383  w3a 1054   = wceq 1523  wcel 2030  {crab 2945  Vcvv 3231  wss 3607  ifcif 4119  𝒫 cpw 4191   cint 4507   ciun 4552   class class class wbr 4685   We wwe 5101   × cxp 5141  ccnv 5142  ran crn 5144  1-1wf1 5923  1-1-ontowf1o 5925  cfv 5926  (class class class)co 6690  cmpt2 6692  ωcom 7107  𝑚 cmap 7899  cdom 7995  Fincfn 7997  cardccrd 8799
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1762  ax-4 1777  ax-5 1879  ax-6 1945  ax-7 1981  ax-9 2039  ax-10 2059  ax-11 2074  ax-12 2087  ax-13 2282  ax-ext 2631  ax-sep 4814  ax-nul 4822  ax-pr 4936
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1056  df-tru 1526  df-ex 1745  df-nf 1750  df-sb 1938  df-eu 2502  df-mo 2503  df-clab 2638  df-cleq 2644  df-clel 2647  df-nfc 2782  df-ral 2946  df-rex 2947  df-rab 2950  df-v 3233  df-sbc 3469  df-dif 3610  df-un 3612  df-in 3614  df-ss 3621  df-nul 3949  df-if 4120  df-sn 4211  df-pr 4213  df-op 4217  df-uni 4469  df-br 4686  df-opab 4746  df-id 5053  df-xp 5149  df-rel 5150  df-cnv 5151  df-co 5152  df-dm 5153  df-iota 5889  df-fun 5928  df-fv 5934  df-ov 6693  df-oprab 6694  df-mpt2 6695
This theorem is referenced by:  pwfseqlem4a  9521  pwfseqlem4  9522
  Copyright terms: Public domain W3C validator