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

Theorem itunisuc 9637
Description: Successor iterated union. (Contributed by Stefan O'Rear, 11-Feb-2015.)
Hypothesis
Ref Expression
ituni.u 𝑈 = (𝑥 ∈ V ↦ (rec((𝑦 ∈ V ↦ 𝑦), 𝑥) ↾ ω))
Assertion
Ref Expression
itunisuc ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵)
Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦
Allowed substitution hints:   𝑈(𝑥,𝑦)

Proof of Theorem itunisuc
Dummy variable 𝑎 is distinct from all other variables.
StepHypRef Expression
1 frsuc 7874 . . . . . 6 (𝐵 ∈ ω → ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘suc 𝐵) = ((𝑦 ∈ V ↦ 𝑦)‘((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵)))
2 fvex 6509 . . . . . . 7 ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵) ∈ V
3 unieq 4716 . . . . . . . 8 (𝑎 = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵) → 𝑎 = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
4 unieq 4716 . . . . . . . . 9 (𝑦 = 𝑎 𝑦 = 𝑎)
54cbvmptv 5024 . . . . . . . 8 (𝑦 ∈ V ↦ 𝑦) = (𝑎 ∈ V ↦ 𝑎)
62uniex 7281 . . . . . . . 8 ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵) ∈ V
73, 5, 6fvmpt 6593 . . . . . . 7 (((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵) ∈ V → ((𝑦 ∈ V ↦ 𝑦)‘((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵)) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
82, 7ax-mp 5 . . . . . 6 ((𝑦 ∈ V ↦ 𝑦)‘((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵)) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵)
91, 8syl6eq 2823 . . . . 5 (𝐵 ∈ ω → ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘suc 𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
109adantl 474 . . . 4 ((𝐴 ∈ V ∧ 𝐵 ∈ ω) → ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘suc 𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
11 ituni.u . . . . . . 7 𝑈 = (𝑥 ∈ V ↦ (rec((𝑦 ∈ V ↦ 𝑦), 𝑥) ↾ ω))
1211itunifval 9634 . . . . . 6 (𝐴 ∈ V → (𝑈𝐴) = (rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω))
1312fveq1d 6498 . . . . 5 (𝐴 ∈ V → ((𝑈𝐴)‘suc 𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘suc 𝐵))
1413adantr 473 . . . 4 ((𝐴 ∈ V ∧ 𝐵 ∈ ω) → ((𝑈𝐴)‘suc 𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘suc 𝐵))
1512fveq1d 6498 . . . . . 6 (𝐴 ∈ V → ((𝑈𝐴)‘𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
1615adantr 473 . . . . 5 ((𝐴 ∈ V ∧ 𝐵 ∈ ω) → ((𝑈𝐴)‘𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
1716unieqd 4718 . . . 4 ((𝐴 ∈ V ∧ 𝐵 ∈ ω) → ((𝑈𝐴)‘𝐵) = ((rec((𝑦 ∈ V ↦ 𝑦), 𝐴) ↾ ω)‘𝐵))
1810, 14, 173eqtr4d 2817 . . 3 ((𝐴 ∈ V ∧ 𝐵 ∈ ω) → ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵))
19 uni0 4735 . . . . 5 ∅ = ∅
2019eqcomi 2780 . . . 4 ∅ =
2111itunifn 9635 . . . . . . . . . 10 (𝐴 ∈ V → (𝑈𝐴) Fn ω)
22 fndm 6285 . . . . . . . . . 10 ((𝑈𝐴) Fn ω → dom (𝑈𝐴) = ω)
2321, 22syl 17 . . . . . . . . 9 (𝐴 ∈ V → dom (𝑈𝐴) = ω)
2423eleq2d 2844 . . . . . . . 8 (𝐴 ∈ V → (suc 𝐵 ∈ dom (𝑈𝐴) ↔ suc 𝐵 ∈ ω))
25 peano2b 7410 . . . . . . . 8 (𝐵 ∈ ω ↔ suc 𝐵 ∈ ω)
2624, 25syl6bbr 281 . . . . . . 7 (𝐴 ∈ V → (suc 𝐵 ∈ dom (𝑈𝐴) ↔ 𝐵 ∈ ω))
2726notbid 310 . . . . . 6 (𝐴 ∈ V → (¬ suc 𝐵 ∈ dom (𝑈𝐴) ↔ ¬ 𝐵 ∈ ω))
2827biimpar 470 . . . . 5 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ¬ suc 𝐵 ∈ dom (𝑈𝐴))
29 ndmfv 6526 . . . . 5 (¬ suc 𝐵 ∈ dom (𝑈𝐴) → ((𝑈𝐴)‘suc 𝐵) = ∅)
3028, 29syl 17 . . . 4 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ((𝑈𝐴)‘suc 𝐵) = ∅)
3123eleq2d 2844 . . . . . . . 8 (𝐴 ∈ V → (𝐵 ∈ dom (𝑈𝐴) ↔ 𝐵 ∈ ω))
3231notbid 310 . . . . . . 7 (𝐴 ∈ V → (¬ 𝐵 ∈ dom (𝑈𝐴) ↔ ¬ 𝐵 ∈ ω))
3332biimpar 470 . . . . . 6 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ¬ 𝐵 ∈ dom (𝑈𝐴))
34 ndmfv 6526 . . . . . 6 𝐵 ∈ dom (𝑈𝐴) → ((𝑈𝐴)‘𝐵) = ∅)
3533, 34syl 17 . . . . 5 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ((𝑈𝐴)‘𝐵) = ∅)
3635unieqd 4718 . . . 4 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ((𝑈𝐴)‘𝐵) = ∅)
3720, 30, 363eqtr4a 2833 . . 3 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ ω) → ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵))
3818, 37pm2.61dan 801 . 2 (𝐴 ∈ V → ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵))
39 0fv 6536 . . . . 5 (∅‘𝐵) = ∅
4039unieqi 4717 . . . 4 (∅‘𝐵) =
41 0fv 6536 . . . 4 (∅‘suc 𝐵) = ∅
4219, 40, 413eqtr4ri 2806 . . 3 (∅‘suc 𝐵) = (∅‘𝐵)
43 fvprc 6489 . . . 4 𝐴 ∈ V → (𝑈𝐴) = ∅)
4443fveq1d 6498 . . 3 𝐴 ∈ V → ((𝑈𝐴)‘suc 𝐵) = (∅‘suc 𝐵))
4543fveq1d 6498 . . . 4 𝐴 ∈ V → ((𝑈𝐴)‘𝐵) = (∅‘𝐵))
4645unieqd 4718 . . 3 𝐴 ∈ V → ((𝑈𝐴)‘𝐵) = (∅‘𝐵))
4742, 44, 463eqtr4a 2833 . 2 𝐴 ∈ V → ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵))
4838, 47pm2.61i 177 1 ((𝑈𝐴)‘suc 𝐵) = ((𝑈𝐴)‘𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wa 387   = wceq 1508  wcel 2051  Vcvv 3408  c0 4172   cuni 4708  cmpt 5004  dom cdm 5403  cres 5405  suc csuc 6028   Fn wfn 6180  cfv 6185  ωcom 7394  reccrdg 7847
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1759  ax-4 1773  ax-5 1870  ax-6 1929  ax-7 1966  ax-8 2053  ax-9 2060  ax-10 2080  ax-11 2094  ax-12 2107  ax-13 2302  ax-ext 2743  ax-rep 5045  ax-sep 5056  ax-nul 5063  ax-pow 5115  ax-pr 5182  ax-un 7277  ax-inf2 8896
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 835  df-3or 1070  df-3an 1071  df-tru 1511  df-ex 1744  df-nf 1748  df-sb 2017  df-mo 2548  df-eu 2585  df-clab 2752  df-cleq 2764  df-clel 2839  df-nfc 2911  df-ne 2961  df-ral 3086  df-rex 3087  df-reu 3088  df-rab 3090  df-v 3410  df-sbc 3675  df-csb 3780  df-dif 3825  df-un 3827  df-in 3829  df-ss 3836  df-pss 3838  df-nul 4173  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4709  df-iun 4790  df-br 4926  df-opab 4988  df-mpt 5005  df-tr 5027  df-id 5308  df-eprel 5313  df-po 5322  df-so 5323  df-fr 5362  df-we 5364  df-xp 5409  df-rel 5410  df-cnv 5411  df-co 5412  df-dm 5413  df-rn 5414  df-res 5415  df-ima 5416  df-pred 5983  df-ord 6029  df-on 6030  df-lim 6031  df-suc 6032  df-iota 6149  df-fun 6187  df-fn 6188  df-f 6189  df-f1 6190  df-fo 6191  df-f1o 6192  df-fv 6193  df-om 7395  df-wrecs 7748  df-recs 7810  df-rdg 7848
This theorem is referenced by:  itunitc1  9638  itunitc  9639  ituniiun  9640
  Copyright terms: Public domain W3C validator