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 39867
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 14336 . 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 2883 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
54inteqi 4871 . . . 4 {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))} = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}
65mpteq2i 5149 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))})
7 vex 3495 . . . . . 6 𝑥 ∈ V
87rtrclexi 39859 . . . . 5 {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V
98a1i 11 . . . 4 (𝑥 ∈ V → {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∈ V)
10 dmexg 7602 . . . . . . . . 9 (𝑥 ∈ V → dom 𝑥 ∈ V)
11 rnexg 7603 . . . . . . . . 9 (𝑥 ∈ V → ran 𝑥 ∈ V)
12 unexg 7461 . . . . . . . . 9 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → (dom 𝑥 ∪ ran 𝑥) ∈ V)
1310, 11, 12syl2anc 584 . . . . . . . 8 (𝑥 ∈ V → (dom 𝑥 ∪ ran 𝑥) ∈ V)
14 resiexg 7608 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∈ V → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
157, 13, 14mp2b 10 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
167, 15unex 7458 . . . . . 6 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
1716trclexi 39858 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V
1817a1i 11 . . . 4 (𝑥 ∈ V → {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∈ V)
19 simpr 485 . . . . . 6 (((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) → (𝑧𝑧) ⊆ 𝑧)
2019cotrintab 39852 . . . . 5 ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
2120a1i 11 . . . 4 (𝑥 ∈ V → ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
227dmex 7605 . . . . . . . . . . . . 13 dom 𝑥 ∈ V
237rnex 7606 . . . . . . . . . . . . 13 ran 𝑥 ∈ V
2412resiexd 6970 . . . . . . . . . . . . 13 ((dom 𝑥 ∈ V ∧ ran 𝑥 ∈ V) → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
2522, 23, 24mp2an 688 . . . . . . . . . . . 12 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
267, 25unex 7458 . . . . . . . . . . 11 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ∈ V
27 dmtrcl 39865 . . . . . . . . . . 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 5772 . . . . . . . . . . 11 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
30 dmresi 5914 . . . . . . . . . . . 12 dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3130uneq2i 4133 . . . . . . . . . . 11 (dom 𝑥 ∪ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
32 ssun1 4145 . . . . . . . . . . . 12 dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
33 ssequn1 4153 . . . . . . . . . . . 12 (dom 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
3432, 33mpbi 231 . . . . . . . . . . 11 (dom 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
3529, 31, 343eqtri 2845 . . . . . . . . . 10 dom (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
3628, 35eqtri 2841 . . . . . . . . 9 dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
37 rntrcl 39866 . . . . . . . . . . 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 5997 . . . . . . . . . . 11 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
40 rnresi 5936 . . . . . . . . . . . 12 ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4140uneq2i 4133 . . . . . . . . . . 11 (ran 𝑥 ∪ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥))
42 ssun2 4146 . . . . . . . . . . . 12 ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥)
43 ssequn1 4153 . . . . . . . . . . . 12 (ran 𝑥 ⊆ (dom 𝑥 ∪ ran 𝑥) ↔ (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥))
4442, 43mpbi 231 . . . . . . . . . . 11 (ran 𝑥 ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4539, 41, 443eqtri 2845 . . . . . . . . . 10 ran (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) = (dom 𝑥 ∪ ran 𝑥)
4638, 45eqtri 2841 . . . . . . . . 9 ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = (dom 𝑥 ∪ ran 𝑥)
4736, 46uneq12i 4134 . . . . . . . 8 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥))
48 unidm 4125 . . . . . . . 8 ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
4947, 48eqtri 2841 . . . . . . 7 (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (dom 𝑥 ∪ ran 𝑥)
5049reseq2i 5843 . . . . . 6 ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})) = ( I ↾ (dom 𝑥 ∪ ran 𝑥))
51 ssun2 4146 . . . . . . 7 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥)))
52 ssmin 4886 . . . . . . 7 (𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5351, 52sstri 3973 . . . . . 6 ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
5450, 53eqsstri 3998 . . . . 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 39852 . . . . 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 5728 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (𝑦𝑦) = ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6160, 59sseq12d 3997 . . . 4 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ((𝑦𝑦) ⊆ 𝑦 ↔ ( {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∘ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) ⊆ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
62 dmeq 5765 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → dom 𝑦 = dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
63 rneq 5799 . . . . . . 7 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ran 𝑦 = ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
6462, 63uneq12d 4137 . . . . . 6 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → (dom 𝑦 ∪ ran 𝑦) = (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}))
6564reseq2d 5846 . . . . 5 (𝑦 = {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} → ( I ↾ (dom 𝑦 ∪ ran 𝑦)) = ( I ↾ (dom {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} ∪ ran {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})))
6665, 59sseq12d 3997 . . . 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 5728 . . . . 5 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → (𝑧𝑧) = ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
6968, 67sseq12d 3997 . . . 4 (𝑧 = {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} → ((𝑧𝑧) ⊆ 𝑧 ↔ ( {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))} ∘ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) ⊆ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}))
709, 18, 21, 55, 58, 61, 66, 69mptrcllem 39851 . . 3 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ ((𝑦𝑦) ⊆ 𝑦 ∧ ( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
71 df-3an 1081 . . . . . . 7 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧) ↔ ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ∧ (𝑧𝑧) ⊆ 𝑧))
72 ancom 461 . . . . . . . . 9 ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧) ↔ (𝑥𝑧 ∧ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧))
73 unss 4157 . . . . . . . . 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 2883 . . . . 5 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7877inteqi 4871 . . . 4 {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)} = {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}
7978mpteq2i 5149 . . 3 (𝑥 ∈ V ↦ {𝑧 ∣ ((𝑥 ∪ ( I ↾ (dom 𝑥 ∪ ran 𝑥))) ⊆ 𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
806, 70, 793eqtri 2845 . 2 (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))}) = (𝑥 ∈ V ↦ {𝑧 ∣ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧𝑥𝑧 ∧ (𝑧𝑧) ⊆ 𝑧)})
811, 80eqtr4i 2844 1 t* = (𝑥 ∈ V ↦ {𝑦 ∣ (𝑥𝑦 ∧ (( I ↾ (dom 𝑦 ∪ ran 𝑦)) ⊆ 𝑦 ∧ (𝑦𝑦) ⊆ 𝑦))})
Colors of variables: wff setvar class
Syntax hints:  wa 396  w3a 1079   = wceq 1528  wcel 2105  {cab 2796  Vcvv 3492  cun 3931  wss 3933   cint 4867  cmpt 5137   I cid 5452  dom cdm 5548  ran crn 5549  cres 5550  ccom 5552  t*crtcl 14334
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-ral 3140  df-rex 3141  df-reu 3142  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4831  df-int 4868  df-iun 4912  df-br 5058  df-opab 5120  df-mpt 5138  df-id 5453  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-rtrcl 14336
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator