Users' Mathboxes Mathbox for Richard Penner < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  comptiunov2i Structured version   Visualization version   GIF version

Theorem comptiunov2i 44460
Description: The composition two indexed unions is sometimes a similar indexed union. (Contributed by RP, 10-Jun-2020.)
Hypotheses
Ref Expression
comptiunov2.x 𝑋 = (𝑎 ∈ V ↦ 𝑖𝐼 (𝑎 𝑖))
comptiunov2.y 𝑌 = (𝑏 ∈ V ↦ 𝑗𝐽 (𝑏 𝑗))
comptiunov2.z 𝑍 = (𝑐 ∈ V ↦ 𝑘𝐾 (𝑐 𝑘))
comptiunov2.i 𝐼 ∈ V
comptiunov2.j 𝐽 ∈ V
comptiunov2.k 𝐾 = (𝐼𝐽)
comptiunov2.1 𝑘𝐼 (𝑑 𝑘) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
comptiunov2.2 𝑘𝐽 (𝑑 𝑘) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
comptiunov2.3 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) ⊆ 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘)
Assertion
Ref Expression
comptiunov2i (𝑋𝑌) = 𝑍
Distinct variable groups:   𝑖,𝑎,   ,𝑏   ,𝑐   𝐼,𝑎,𝑖   𝑘,𝐼   𝑗,𝑎,𝐽,𝑖   𝐽,𝑏   𝑘,𝐽   𝑘,𝑐,𝐾   𝑋,𝑑   𝑌,𝑑   𝑍,𝑑   𝑎,𝑑,𝑖,𝑗   𝑏,𝑑,𝑗   𝑐,𝑑,𝑘
Allowed substitution hints:   (𝑗, 𝑘, 𝑑)   𝐼(𝑗, 𝑏, 𝑐, 𝑑)   𝐽(𝑐, 𝑑)   𝐾(𝑖, 𝑗, 𝑎, 𝑏, 𝑑)   𝑋(𝑖, 𝑗, 𝑘, 𝑎, 𝑏, 𝑐)   𝑌(𝑖, 𝑗, 𝑘, 𝑎, 𝑏, 𝑐)   𝑍(𝑖, 𝑗, 𝑘, 𝑎, 𝑏, 𝑐)

Proof of Theorem comptiunov2i
StepHypRef Expression
1 comptiunov2.x . . . 4 𝑋 = (𝑎 ∈ V ↦ 𝑖𝐼 (𝑎 𝑖))
21funmpt2 6575 . . 3 Fun 𝑋
3 comptiunov2.y . . . 4 𝑌 = (𝑏 ∈ V ↦ 𝑗𝐽 (𝑏 𝑗))
43funmpt2 6575 . . 3 Fun 𝑌
5 funco 6576 . . 3 ((Fun 𝑋 ∧ Fun 𝑌) → Fun (𝑋𝑌))
62, 4, 5mp2an 704 . 2 Fun (𝑋𝑌)
7 comptiunov2.z . . 3 𝑍 = (𝑐 ∈ V ↦ 𝑘𝐾 (𝑐 𝑘))
87funmpt2 6575 . 2 Fun 𝑍
9 ssv 3960 . . . . . . 7 ran 𝑌 ⊆ V
10 comptiunov2.i . . . . . . . . 9 𝐼 ∈ V
11 ovex 7445 . . . . . . . . 9 (𝑎 𝑖) ∈ V
1210, 11iunex 7963 . . . . . . . 8 𝑖𝐼 (𝑎 𝑖) ∈ V
1312, 1dmmpti 6679 . . . . . . 7 dom 𝑋 = V
149, 13sseqtrri 3985 . . . . . 6 ran 𝑌 ⊆ dom 𝑋
15 dmcosseq 5967 . . . . . 6 (ran 𝑌 ⊆ dom 𝑋 → dom (𝑋𝑌) = dom 𝑌)
1614, 15ax-mp 5 . . . . 5 dom (𝑋𝑌) = dom 𝑌
17 comptiunov2.j . . . . . . 7 𝐽 ∈ V
18 ovex 7445 . . . . . . 7 (𝑏 𝑗) ∈ V
1917, 18iunex 7963 . . . . . 6 𝑗𝐽 (𝑏 𝑗) ∈ V
2019, 3dmmpti 6679 . . . . 5 dom 𝑌 = V
2116, 20eqtri 2785 . . . 4 dom (𝑋𝑌) = V
22 comptiunov2.k . . . . . . 7 𝐾 = (𝐼𝐽)
2310, 17unex 7744 . . . . . . 7 (𝐼𝐽) ∈ V
2422, 23eqeltri 2858 . . . . . 6 𝐾 ∈ V
25 ovex 7445 . . . . . 6 (𝑐 𝑘) ∈ V
2624, 25iunex 7963 . . . . 5 𝑘𝐾 (𝑐 𝑘) ∈ V
2726, 7dmmpti 6679 . . . 4 dom 𝑍 = V
2821, 27eqtr4i 2788 . . 3 dom (𝑋𝑌) = dom 𝑍
29 vex 3458 . . . . . . . . 9 𝑑 ∈ V
3029, 20eleqtrri 2861 . . . . . . . 8 𝑑 ∈ dom 𝑌
31 fvco 6979 . . . . . . . 8 ((Fun 𝑌𝑑 ∈ dom 𝑌) → ((𝑋𝑌)‘𝑑) = (𝑋‘(𝑌𝑑)))
324, 30, 31mp2an 704 . . . . . . 7 ((𝑋𝑌)‘𝑑) = (𝑋‘(𝑌𝑑))
33 oveq1 7419 . . . . . . . . . . 11 (𝑏 = 𝑑 → (𝑏 𝑗) = (𝑑 𝑗))
3433iuneq2d 4986 . . . . . . . . . 10 (𝑏 = 𝑑 𝑗𝐽 (𝑏 𝑗) = 𝑗𝐽 (𝑑 𝑗))
35 ovex 7445 . . . . . . . . . . 11 (𝑑 𝑗) ∈ V
3617, 35iunex 7963 . . . . . . . . . 10 𝑗𝐽 (𝑑 𝑗) ∈ V
3734, 3, 36fvmpt 6989 . . . . . . . . 9 (𝑑 ∈ V → (𝑌𝑑) = 𝑗𝐽 (𝑑 𝑗))
3837elv 3459 . . . . . . . 8 (𝑌𝑑) = 𝑗𝐽 (𝑑 𝑗)
3938fveq2i 6884 . . . . . . 7 (𝑋‘(𝑌𝑑)) = (𝑋 𝑗𝐽 (𝑑 𝑗))
40 oveq1 7419 . . . . . . . . . 10 (𝑎 = 𝑗𝐽 (𝑑 𝑗) → (𝑎 𝑖) = ( 𝑗𝐽 (𝑑 𝑗) 𝑖))
4140iuneq2d 4986 . . . . . . . . 9 (𝑎 = 𝑗𝐽 (𝑑 𝑗) → 𝑖𝐼 (𝑎 𝑖) = 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖))
42 ovex 7445 . . . . . . . . . 10 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) ∈ V
4310, 42iunex 7963 . . . . . . . . 9 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) ∈ V
4441, 1, 43fvmpt 6989 . . . . . . . 8 ( 𝑗𝐽 (𝑑 𝑗) ∈ V → (𝑋 𝑗𝐽 (𝑑 𝑗)) = 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖))
4536, 44ax-mp 5 . . . . . . 7 (𝑋 𝑗𝐽 (𝑑 𝑗)) = 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
4632, 39, 453eqtri 2789 . . . . . 6 ((𝑋𝑌)‘𝑑) = 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
47 oveq1 7419 . . . . . . . . 9 (𝑐 = 𝑑 → (𝑐 𝑘) = (𝑑 𝑘))
4847iuneq2d 4986 . . . . . . . 8 (𝑐 = 𝑑 𝑘𝐾 (𝑐 𝑘) = 𝑘𝐾 (𝑑 𝑘))
49 ovex 7445 . . . . . . . . 9 (𝑑 𝑘) ∈ V
5024, 49iunex 7963 . . . . . . . 8 𝑘𝐾 (𝑑 𝑘) ∈ V
5148, 7, 50fvmpt 6989 . . . . . . 7 (𝑑 ∈ V → (𝑍𝑑) = 𝑘𝐾 (𝑑 𝑘))
5251elv 3459 . . . . . 6 (𝑍𝑑) = 𝑘𝐾 (𝑑 𝑘)
5346, 52eqeq12i 2780 . . . . 5 (((𝑋𝑌)‘𝑑) = (𝑍𝑑) ↔ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) = 𝑘𝐾 (𝑑 𝑘))
5421, 53raleqbii 3335 . . . 4 (∀𝑑 ∈ dom (𝑋𝑌)((𝑋𝑌)‘𝑑) = (𝑍𝑑) ↔ ∀𝑑 ∈ V 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) = 𝑘𝐾 (𝑑 𝑘))
55 comptiunov2.3 . . . . . . 7 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) ⊆ 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘)
56 iunxun 5059 . . . . . . . 8 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘) = ( 𝑘𝐼 (𝑑 𝑘) ∪ 𝑘𝐽 (𝑑 𝑘))
57 comptiunov2.1 . . . . . . . . 9 𝑘𝐼 (𝑑 𝑘) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
58 comptiunov2.2 . . . . . . . . 9 𝑘𝐽 (𝑑 𝑘) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
5957, 58unssi 4143 . . . . . . . 8 ( 𝑘𝐼 (𝑑 𝑘) ∪ 𝑘𝐽 (𝑑 𝑘)) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
6056, 59eqsstri 3982 . . . . . . 7 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘) ⊆ 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖)
6155, 60eqssi 3952 . . . . . 6 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) = 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘)
62 iuneq1 4972 . . . . . . 7 (𝐾 = (𝐼𝐽) → 𝑘𝐾 (𝑑 𝑘) = 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘))
6322, 62ax-mp 5 . . . . . 6 𝑘𝐾 (𝑑 𝑘) = 𝑘 ∈ (𝐼𝐽)(𝑑 𝑘)
6461, 63eqtr4i 2788 . . . . 5 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) = 𝑘𝐾 (𝑑 𝑘)
6564a1i 11 . . . 4 (𝑑 ∈ V → 𝑖𝐼 ( 𝑗𝐽 (𝑑 𝑗) 𝑖) = 𝑘𝐾 (𝑑 𝑘))
6654, 65mprgbir 3085 . . 3 𝑑 ∈ dom (𝑋𝑌)((𝑋𝑌)‘𝑑) = (𝑍𝑑)
67 eqfunfv 7031 . . . 4 ((Fun (𝑋𝑌) ∧ Fun 𝑍) → ((𝑋𝑌) = 𝑍 ↔ (dom (𝑋𝑌) = dom 𝑍 ∧ ∀𝑑 ∈ dom (𝑋𝑌)((𝑋𝑌)‘𝑑) = (𝑍𝑑))))
6867biimprd 251 . . 3 ((Fun (𝑋𝑌) ∧ Fun 𝑍) → ((dom (𝑋𝑌) = dom 𝑍 ∧ ∀𝑑 ∈ dom (𝑋𝑌)((𝑋𝑌)‘𝑑) = (𝑍𝑑)) → (𝑋𝑌) = 𝑍))
6928, 66, 68mp2ani 710 . 2 ((Fun (𝑋𝑌) ∧ Fun 𝑍) → (𝑋𝑌) = 𝑍)
706, 8, 69mp2an 704 1 (𝑋𝑌) = 𝑍
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wa 400   = wceq 1569  wcel 2142  wral 3078  Vcvv 3454  cun 3902  wss 3904   ciun 4955  cmpt 5191  dom cdm 5660  ran crn 5661  ccom 5664  Fun wfun 6530  cfv 6536  (class class class)co 7412
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pr 5403  ax-un 7734
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4487  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-id 5555  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-iota 6492  df-fun 6538  df-fn 6539  df-fv 6544  df-ov 7415
This theorem is used by:  corclrcl  44461  cotrcltrcl  44479  corcltrcl  44493  cotrclrcl  44496
  Copyright terms: Public domain W3C validator