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

Theorem dfrtrcl5 38635
Description: Definition of reflexive-transitive closure as a standard closure. (Contributed by RP, 1-Nov-2020.)
Assertion
Ref Expression
dfrtrcl5 t* = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))})
Distinct variable group:   𝑥,𝑦

Proof of Theorem dfrtrcl5
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 df-rtrcl 14028 . 2 t* = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
2 ancom 452 . . . . . . 7 ((( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦) ↔ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))
32anbi2i 616 . . . . . 6 ((𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦)) ↔ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦)))
43abbii 2882 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
54inteqi 4639 . . . 4 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
65mpteq2i 4902 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))})
7 vex 3353 . . . . . 6 𝑥 ∈ V
87rtrclexi 38627 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V
98a1i 11 . . . 4 (𝑥 ∈ V → {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V)
10 dmexg 7299 . . . . . . . . 9 (𝑥 ∈ V → dom 𝑥 ∈ V)
11 rnexg 7300 . . . . . . . . 9 (𝑥 ∈ V → ran 𝑥 ∈ V)
12 unexg 7161 . . . . . . . . 9 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → (dom 𝑥 ∪ ran 𝑥) ∈ V)
1310, 11, 12syl2anc 579 . . . . . . . 8 (𝑥 ∈ V → (dom 𝑥 ∪ ran 𝑥) ∈ V)
14 resiexg 7304 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∈ V → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
157, 13, 14mp2b 10 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
167, 15unex 7158 . . . . . 6 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
1716trclexi 38626 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V
1817a1i 11 . . . 4 (𝑥 ∈ V → {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V)
19 simpr 477 . . . . . 6 (((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) → (𝑧𝑧) ⊆ 𝑧)
2019cotrintab 38620 . . . . 5 ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
2120a1i 11 . . . 4 (𝑥 ∈ V → ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
227dmex 7301 . . . . . . . . . . . . 13 dom 𝑥 ∈ V
237rnex 7302 . . . . . . . . . . . . 13 ran 𝑥 ∈ V
2412resiexd 6677 . . . . . . . . . . . . 13 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
2522, 23, 24mp2an 683 . . . . . . . . . . . 12 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
267, 25unex 7158 . . . . . . . . . . 11 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
27 dmtrcl 38633 . . . . . . . . . . 11 ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V → dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))))
2826, 27ax-mp 5 . . . . . . . . . 10 dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
29 dmun 5501 . . . . . . . . . . 11 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
30 dmresi 5643 . . . . . . . . . . . 12 dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3130uneq2i 3928 . . . . . . . . . . 11 (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
32 ssun1 3940 . . . . . . . . . . . 12 dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
33 ssequn1 3947 . . . . . . . . . . . 12 (dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
3432, 33mpbi 221 . . . . . . . . . . 11 (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3529, 31, 343eqtri 2791 . . . . . . . . . 10 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
3628, 35eqtri 2787 . . . . . . . . 9 dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
37 rntrcl 38634 . . . . . . . . . . 11 ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V → ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))))
3826, 37ax-mp 5 . . . . . . . . . 10 ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
39 rnun 5726 . . . . . . . . . . 11 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
40 rnresi 5663 . . . . . . . . . . . 12 ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4140uneq2i 3928 . . . . . . . . . . 11 (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
42 ssun2 3941 . . . . . . . . . . . 12 ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
43 ssequn1 3947 . . . . . . . . . . . 12 (ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
4442, 43mpbi 221 . . . . . . . . . . 11 (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4539, 41, 443eqtri 2791 . . . . . . . . . 10 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
4638, 45eqtri 2787 . . . . . . . . 9 ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
4736, 46uneq12i 3929 . . . . . . . 8 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥))
48 unidm 3920 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4947, 48eqtri 2787 . . . . . . 7 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (dom 𝑥 ∪ ran 𝑥)
5049reseq2i 5564 . . . . . 6 ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) = ( I ↾ (dom 𝑥 ∪ ran 𝑥))
51 ssun2 3941 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
52 ssmin 4654 . . . . . . 7 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5351, 52sstri 3772 . . . . . 6 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5450, 53eqsstri 3797 . . . . 5 ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5554a1i 11 . . . 4 (𝑥 ∈ V → ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
56 simprl 787 . . . . . 6 ((𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦)) → (𝑦𝑦) ⊆ 𝑦)
5756cotrintab 38620 . . . . 5 ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) ⊆ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
5857a1i 11 . . . 4 (𝑥 ∈ V → ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) ⊆ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))})
59 id 22 . . . . . 6 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → 𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
6059, 59coeq12d 5457 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (𝑦𝑦) = ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6160, 59sseq12d 3796 . . . 4 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ((𝑦𝑦) ⊆ 𝑦 ↔ ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
62 dmeq 5494 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → dom 𝑦 = dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
63 rneq 5521 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ran 𝑦 = ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
6462, 63uneq12d 3932 . . . . . 6 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (dom 𝑦 ∪ ran 𝑦) = (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6564reseq2d 5567 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ( I ↾ (dom 𝑦 ∪ ran 𝑦)) = ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})))
6665, 59sseq12d 3796 . . . 4 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ↔ ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
67 id 22 . . . . . 6 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → 𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))})
6867, 67coeq12d 5457 . . . . 5 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → (𝑧𝑧) = ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
6968, 67sseq12d 3796 . . . 4 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → ((𝑧𝑧) ⊆ 𝑧 ↔ ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) ⊆ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
709, 18, 21, 55, 58, 61, 66, 69mptrcllem 38619 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
71 df-3an 1109 . . . . . . 7 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) ↔ ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ∧ (𝑧𝑧) ⊆ 𝑧))
72 ancom 452 . . . . . . . . 9 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ↔ (𝑥𝑧 ∧ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧))
73 unss 3951 . . . . . . . . 9 ((𝑥𝑧 ∧ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧) ↔ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧)
7472, 73bitri 266 . . . . . . . 8 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ↔ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧)
7574anbi1i 617 . . . . . . 7 (((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ∧ (𝑧𝑧) ⊆ 𝑧) ↔ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧))
7671, 75bitr2i 267 . . . . . 6 (((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) ↔ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧))
7776abbii 2882 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7877inteqi 4639 . . . 4 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7978mpteq2i 4902 . . 3 (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
806, 70, 793eqtri 2791 . 2 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
811, 80eqtr4i 2790 1 t* = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))})
Colors of variables: wff setvar class
Syntax hints:  wa 384  w3a 1107   = wceq 1652  wcel 2155  {cab 2751  Vcvv 3350  cun 3732  wss 3734   cint 4635  cmpt 4890   I cid 5186  dom cdm 5279  ran crn 5280  cres 5281  ccom 5283  t*crtcl 14026
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-8 2157  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-rep 4932  ax-sep 4943  ax-nul 4951  ax-pow 5003  ax-pr 5064  ax-un 7151
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-ral 3060  df-rex 3061  df-reu 3062  df-rab 3064  df-v 3352  df-sbc 3599  df-csb 3694  df-dif 3737  df-un 3739  df-in 3741  df-ss 3748  df-nul 4082  df-if 4246  df-pw 4319  df-sn 4337  df-pr 4339  df-op 4343  df-uni 4597  df-int 4636  df-iun 4680  df-br 4812  df-opab 4874  df-mpt 4891  df-id 5187  df-xp 5285  df-rel 5286  df-cnv 5287  df-co 5288  df-dm 5289  df-rn 5290  df-res 5291  df-ima 5292  df-iota 6033  df-fun 6072  df-fn 6073  df-f 6074  df-f1 6075  df-fo 6076  df-f1o 6077  df-fv 6078  df-rtrcl 14028
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator