Metamath Proof Explorer


Theorem dfon2lem6

Description: Lemma for dfon2 . A transitive class of sets satisfying the new definition satisfies the new definition. (Contributed by Scott Fenton, 25-Feb-2011)

Ref Expression
Assertion dfon2lem6 Tr S x S z z x Tr z z x y y S Tr y y S

Proof

Step Hyp Ref Expression
1 pssss y S y S
2 ssralv y S x S z z x Tr z z x x y z z x Tr z z x
3 1 2 syl y S x S z z x Tr z z x x y z z x Tr z z x
4 3 impcom x S z z x Tr z z x y S x y z z x Tr z z x
5 4 adantrr x S z z x Tr z z x y S Tr y x y z z x Tr z z x
6 5 ad2ant2lr Tr S x S z z x Tr z z x y S Tr y s S y x y z z x Tr z z x
7 psseq2 x = w z x z w
8 7 anbi1d x = w z x Tr z z w Tr z
9 elequ2 x = w z x z w
10 8 9 imbi12d x = w z x Tr z z x z w Tr z z w
11 10 albidv x = w z z x Tr z z x z z w Tr z z w
12 11 rspccv x y z z x Tr z z x w y z z w Tr z z w
13 6 12 syl Tr S x S z z x Tr z z x y S Tr y s S y w y z z w Tr z z w
14 13 imp Tr S x S z z x Tr z z x y S Tr y s S y w y z z w Tr z z w
15 eldifi s S y s S
16 psseq2 x = s z x z s
17 16 anbi1d x = s z x Tr z z s Tr z
18 elequ2 x = s z x z s
19 17 18 imbi12d x = s z x Tr z z x z s Tr z z s
20 19 albidv x = s z z x Tr z z x z z s Tr z z s
21 20 rspcv s S x S z z x Tr z z x z z s Tr z z s
22 15 21 syl s S y x S z z x Tr z z x z z s Tr z z s
23 psseq1 z = t z s t s
24 treq z = t Tr z Tr t
25 23 24 anbi12d z = t z s Tr z t s Tr t
26 elequ1 z = t z s t s
27 25 26 imbi12d z = t z s Tr z z s t s Tr t t s
28 27 cbvalvw z z s Tr z z s t t s Tr t t s
29 22 28 syl6ib s S y x S z z x Tr z z x t t s Tr t t s
30 29 impcom x S z z x Tr z z x s S y t t s Tr t t s
31 30 ad2ant2l Tr S x S z z x Tr z z x y S Tr y s S y t t s Tr t t s
32 31 adantr Tr S x S z z x Tr z z x y S Tr y s S y w y t t s Tr t t s
33 vex w V
34 vex s V
35 33 34 dfon2lem5 z z w Tr z z w t t s Tr t t s w s w = s s w
36 3orrot w s w = s s w w = s s w w s
37 3orass w = s s w w s w = s s w w s
38 36 37 bitri w s w = s s w w = s s w w s
39 eleq1a s S y w = s w S y
40 elndif w y ¬ w S y
41 39 40 nsyli s S y w y ¬ w = s
42 41 imp s S y w y ¬ w = s
43 42 adantll y S Tr y s S y w y ¬ w = s
44 43 adantll Tr S x S z z x Tr z z x y S Tr y s S y w y ¬ w = s
45 orel1 ¬ w = s w = s s w w s s w w s
46 trss Tr y w y w y
47 eldifn s S y ¬ s y
48 ssel w y s w s y
49 48 con3d w y ¬ s y ¬ s w
50 47 49 syl5com s S y w y ¬ s w
51 46 50 syl9 Tr y s S y w y ¬ s w
52 51 adantl y S Tr y s S y w y ¬ s w
53 52 imp31 y S Tr y s S y w y ¬ s w
54 53 adantll Tr S x S z z x Tr z z x y S Tr y s S y w y ¬ s w
55 orel1 ¬ s w s w w s w s
56 54 55 syl Tr S x S z z x Tr z z x y S Tr y s S y w y s w w s w s
57 45 56 syl9r Tr S x S z z x Tr z z x y S Tr y s S y w y ¬ w = s w = s s w w s w s
58 44 57 mpd Tr S x S z z x Tr z z x y S Tr y s S y w y w = s s w w s w s
59 38 58 syl5bi Tr S x S z z x Tr z z x y S Tr y s S y w y w s w = s s w w s
60 35 59 syl5 Tr S x S z z x Tr z z x y S Tr y s S y w y z z w Tr z z w t t s Tr t t s w s
61 14 32 60 mp2and Tr S x S z z x Tr z z x y S Tr y s S y w y w s
62 61 ex Tr S x S z z x Tr z z x y S Tr y s S y w y w s
63 62 ssrdv Tr S x S z z x Tr z z x y S Tr y s S y y s
64 dfpss2 y s y s ¬ y = s
65 psseq1 z = y z s y s
66 treq z = y Tr z Tr y
67 65 66 anbi12d z = y z s Tr z y s Tr y
68 elequ1 z = y z s y s
69 67 68 imbi12d z = y z s Tr z z s y s Tr y y s
70 69 spvv z z s Tr z z s y s Tr y y s
71 70 expd z z s Tr z z s y s Tr y y s
72 71 com23 z z s Tr z z s Tr y y s y s
73 22 72 syl6 s S y x S z z x Tr z z x Tr y y s y s
74 73 com3l x S z z x Tr z z x Tr y s S y y s y s
75 74 adantld x S z z x Tr z z x y S Tr y s S y y s y s
76 75 adantl Tr S x S z z x Tr z z x y S Tr y s S y y s y s
77 76 imp32 Tr S x S z z x Tr z z x y S Tr y s S y y s y s
78 64 77 syl5bir Tr S x S z z x Tr z z x y S Tr y s S y y s ¬ y = s y s
79 63 78 mpand Tr S x S z z x Tr z z x y S Tr y s S y ¬ y = s y s
80 79 orrd Tr S x S z z x Tr z z x y S Tr y s S y y = s y s
81 80 anassrs Tr S x S z z x Tr z z x y S Tr y s S y y = s y s
82 81 ralrimiva Tr S x S z z x Tr z z x y S Tr y s S y y = s y s
83 pssdif y S S y
84 r19.2z S y s S y y = s y s s S y y = s y s
85 84 ex S y s S y y = s y s s S y y = s y s
86 83 85 syl y S s S y y = s y s s S y y = s y s
87 86 ad2antrl Tr S x S z z x Tr z z x y S Tr y s S y y = s y s s S y y = s y s
88 eleq1w y = s y S s S
89 15 88 syl5ibr y = s s S y y S
90 89 a1i Tr S x S z z x Tr z z x y S Tr y y = s s S y y S
91 trel Tr S y s s S y S
92 91 expd Tr S y s s S y S
93 15 92 syl7 Tr S y s s S y y S
94 93 ad2antrr Tr S x S z z x Tr z z x y S Tr y y s s S y y S
95 90 94 jaod Tr S x S z z x Tr z z x y S Tr y y = s y s s S y y S
96 95 com23 Tr S x S z z x Tr z z x y S Tr y s S y y = s y s y S
97 96 rexlimdv Tr S x S z z x Tr z z x y S Tr y s S y y = s y s y S
98 87 97 syld Tr S x S z z x Tr z z x y S Tr y s S y y = s y s y S
99 82 98 mpd Tr S x S z z x Tr z z x y S Tr y y S
100 99 ex Tr S x S z z x Tr z z x y S Tr y y S
101 100 alrimiv Tr S x S z z x Tr z z x y y S Tr y y S