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