Metamath Proof Explorer


Theorem trclexi

Description: The transitive closure of a set exists. (Contributed by RP, 27-Oct-2020)

Ref Expression
Hypothesis trclexi.1 ⊢ A ∈ V
Assertion trclexi ⊢ ⋂ x | A ⊆ x ∧ x ∘ x ⊆ x ∈ V

Proof

Step Hyp Ref Expression
1 trclexi.1 ⊢ A ∈ V
2 ssun1 ⊢ A ⊆ A ∪ dom ⁡ A × ran ⁡ A
3 coundir ⊢ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A = A ∘ A ∪ dom ⁡ A × ran ⁡ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A
4 coundi ⊢ A ∘ A ∪ dom ⁡ A × ran ⁡ A = A ∘ A ∪ A ∘ dom ⁡ A × ran ⁡ A
5 cossxp ⊢ A ∘ A ⊆ dom ⁡ A × ran ⁡ A
6 cossxp ⊢ A ∘ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ dom ⁡ A × ran ⁡ A × ran ⁡ A
7 dmxpss ⊢ dom ⁡ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A
8 xpss1 ⊢ dom ⁡ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A → dom ⁡ dom ⁡ A × ran ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
9 7 8 ax-mp ⊢ dom ⁡ dom ⁡ A × ran ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
10 6 9 sstri ⊢ A ∘ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
11 5 10 unssi ⊢ A ∘ A ∪ A ∘ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
12 4 11 eqsstri ⊢ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
13 coundi ⊢ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A = dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ∘ dom ⁡ A × ran ⁡ A
14 cossxp ⊢ dom ⁡ A × ran ⁡ A ∘ A ⊆ dom ⁡ A × ran ⁡ dom ⁡ A × ran ⁡ A
15 rnxpss ⊢ ran ⁡ dom ⁡ A × ran ⁡ A ⊆ ran ⁡ A
16 xpss2 ⊢ ran ⁡ dom ⁡ A × ran ⁡ A ⊆ ran ⁡ A → dom ⁡ A × ran ⁡ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
17 15 16 ax-mp ⊢ dom ⁡ A × ran ⁡ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
18 14 17 sstri ⊢ dom ⁡ A × ran ⁡ A ∘ A ⊆ dom ⁡ A × ran ⁡ A
19 xptrrel ⊢ dom ⁡ A × ran ⁡ A ∘ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
20 18 19 unssi ⊢ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ∘ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
21 13 20 eqsstri ⊢ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
22 12 21 unssi ⊢ A ∘ A ∪ dom ⁡ A × ran ⁡ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
23 3 22 eqsstri ⊢ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ dom ⁡ A × ran ⁡ A
24 ssun2 ⊢ dom ⁡ A × ran ⁡ A ⊆ A ∪ dom ⁡ A × ran ⁡ A
25 23 24 sstri ⊢ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ A ∪ dom ⁡ A × ran ⁡ A
26 1 elexi ⊢ A ∈ V
27 26 dmex ⊢ dom ⁡ A ∈ V
28 26 rnex ⊢ ran ⁡ A ∈ V
29 27 28 xpex ⊢ dom ⁡ A × ran ⁡ A ∈ V
30 26 29 unex ⊢ A ∪ dom ⁡ A × ran ⁡ A ∈ V
31 trcleq2lem ⊢ x = A ∪ dom ⁡ A × ran ⁡ A → A ⊆ x ∧ x ∘ x ⊆ x ↔ A ⊆ A ∪ dom ⁡ A × ran ⁡ A ∧ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ A ∪ dom ⁡ A × ran ⁡ A
32 30 31 spcev ⊢ A ⊆ A ∪ dom ⁡ A × ran ⁡ A ∧ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ A ∪ dom ⁡ A × ran ⁡ A → ∃ x A ⊆ x ∧ x ∘ x ⊆ x
33 intexab ⊢ ∃ x A ⊆ x ∧ x ∘ x ⊆ x ↔ ⋂ x | A ⊆ x ∧ x ∘ x ⊆ x ∈ V
34 32 33 sylib ⊢ A ⊆ A ∪ dom ⁡ A × ran ⁡ A ∧ A ∪ dom ⁡ A × ran ⁡ A ∘ A ∪ dom ⁡ A × ran ⁡ A ⊆ A ∪ dom ⁡ A × ran ⁡ A → ⋂ x | A ⊆ x ∧ x ∘ x ⊆ x ∈ V
35 2 25 34 mp2an ⊢ ⋂ x | A ⊆ x ∧ x ∘ x ⊆ x ∈ V