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 39873
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 14343 . 2 t* = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
2 ancom 461 . . . . . . 7 ((( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦) ↔ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))
32anbi2i 622 . . . . . 6 ((𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦)) ↔ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦)))
43abbii 2891 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
54inteqi 4878 . . . 4 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
65mpteq2i 5155 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))})
7 vex 3503 . . . . . 6 𝑥 ∈ V
87rtrclexi 39865 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V
98a1i 11 . . . 4 (𝑥 ∈ V → {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V)
10 dmexg 7606 . . . . . . . . 9 (𝑥 ∈ V → dom 𝑥 ∈ V)
11 rnexg 7607 . . . . . . . . 9 (𝑥 ∈ V → ran 𝑥 ∈ V)
12 unexg 7465 . . . . . . . . 9 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → (dom 𝑥 ∪ ran 𝑥) ∈ V)
1310, 11, 12syl2anc 584 . . . . . . . 8 (𝑥 ∈ V → (dom 𝑥 ∪ ran 𝑥) ∈ V)
14 resiexg 7612 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∈ V → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
157, 13, 14mp2b 10 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
167, 15unex 7462 . . . . . 6 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
1716trclexi 39864 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V
1817a1i 11 . . . 4 (𝑥 ∈ V → {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V)
19 simpr 485 . . . . . 6 (((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) → (𝑧𝑧) ⊆ 𝑧)
2019cotrintab 39858 . . . . 5 ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
2120a1i 11 . . . 4 (𝑥 ∈ V → ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
227dmex 7609 . . . . . . . . . . . . 13 dom 𝑥 ∈ V
237rnex 7610 . . . . . . . . . . . . 13 ran 𝑥 ∈ V
2412resiexd 6976 . . . . . . . . . . . . 13 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
2522, 23, 24mp2an 688 . . . . . . . . . . . 12 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
267, 25unex 7462 . . . . . . . . . . 11 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
27 dmtrcl 39871 . . . . . . . . . . 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 5778 . . . . . . . . . . 11 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
30 dmresi 5920 . . . . . . . . . . . 12 dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3130uneq2i 4140 . . . . . . . . . . 11 (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
32 ssun1 4152 . . . . . . . . . . . 12 dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
33 ssequn1 4160 . . . . . . . . . . . 12 (dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
3432, 33mpbi 231 . . . . . . . . . . 11 (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3529, 31, 343eqtri 2853 . . . . . . . . . 10 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
3628, 35eqtri 2849 . . . . . . . . 9 dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
37 rntrcl 39872 . . . . . . . . . . 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 6003 . . . . . . . . . . 11 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
40 rnresi 5942 . . . . . . . . . . . 12 ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4140uneq2i 4140 . . . . . . . . . . 11 (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
42 ssun2 4153 . . . . . . . . . . . 12 ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
43 ssequn1 4160 . . . . . . . . . . . 12 (ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
4442, 43mpbi 231 . . . . . . . . . . 11 (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4539, 41, 443eqtri 2853 . . . . . . . . . 10 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
4638, 45eqtri 2849 . . . . . . . . 9 ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
4736, 46uneq12i 4141 . . . . . . . 8 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥))
48 unidm 4132 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4947, 48eqtri 2849 . . . . . . 7 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (dom 𝑥 ∪ ran 𝑥)
5049reseq2i 5849 . . . . . 6 ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) = ( I ↾ (dom 𝑥 ∪ ran 𝑥))
51 ssun2 4153 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
52 ssmin 4893 . . . . . . 7 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5351, 52sstri 3980 . . . . . 6 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5450, 53eqsstri 4005 . . . . 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 767 . . . . . 6 ((𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦)) → (𝑦𝑦) ⊆ 𝑦)
5756cotrintab 39858 . . . . 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 5734 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (𝑦𝑦) = ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6160, 59sseq12d 4004 . . . 4 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ((𝑦𝑦) ⊆ 𝑦 ↔ ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
62 dmeq 5771 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → dom 𝑦 = dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
63 rneq 5805 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ran 𝑦 = ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
6462, 63uneq12d 4144 . . . . . 6 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (dom 𝑦 ∪ ran 𝑦) = (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6564reseq2d 5852 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ( I ↾ (dom 𝑦 ∪ ran 𝑦)) = ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})))
6665, 59sseq12d 4004 . . . 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 5734 . . . . 5 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → (𝑧𝑧) = ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
6968, 67sseq12d 4004 . . . 4 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → ((𝑧𝑧) ⊆ 𝑧 ↔ ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) ⊆ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
709, 18, 21, 55, 58, 61, 66, 69mptrcllem 39857 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
71 df-3an 1083 . . . . . . 7 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) ↔ ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ∧ (𝑧𝑧) ⊆ 𝑧))
72 ancom 461 . . . . . . . . 9 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ↔ (𝑥𝑧 ∧ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧))
73 unss 4164 . . . . . . . . 9 ((𝑥𝑧 ∧ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧) ↔ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧)
7472, 73bitri 276 . . . . . . . 8 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ↔ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧)
7574anbi1i 623 . . . . . . 7 (((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ∧ (𝑧𝑧) ⊆ 𝑧) ↔ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧))
7671, 75bitr2i 277 . . . . . 6 (((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) ↔ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧))
7776abbii 2891 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7877inteqi 4878 . . . 4 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7978mpteq2i 5155 . . 3 (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
806, 70, 793eqtri 2853 . 2 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
811, 80eqtr4i 2852 1 t* = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))})
Colors of variables: wff setvar class
Syntax hints:  wa 396  w3a 1081   = wceq 1530  wcel 2107  {cab 2804  Vcvv 3500  cun 3938  wss 3940   cint 4874  cmpt 5143   I cid 5458  dom cdm 5554  ran crn 5555  cres 5556  ccom 5558  t*crtcl 14341
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2798  ax-rep 5187  ax-sep 5200  ax-nul 5207  ax-pow 5263  ax-pr 5326  ax-un 7455
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 844  df-3an 1083  df-tru 1533  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2620  df-eu 2652  df-clab 2805  df-cleq 2819  df-clel 2898  df-nfc 2968  df-ne 3022  df-ral 3148  df-rex 3149  df-reu 3150  df-rab 3152  df-v 3502  df-sbc 3777  df-csb 3888  df-dif 3943  df-un 3945  df-in 3947  df-ss 3956  df-nul 4296  df-if 4471  df-pw 4544  df-sn 4565  df-pr 4567  df-op 4571  df-uni 4838  df-int 4875  df-iun 4919  df-br 5064  df-opab 5126  df-mpt 5144  df-id 5459  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-rtrcl 14343
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator