Metamath Proof Explorer


Theorem ttrclss

Description: If R is a subclass of S and S is transitive, then the transitive closure of R is a subclass of S . (Contributed by Scott Fenton, 20-Oct-2024)

Ref Expression
Assertion ttrclss Could not format assertion : No typesetting found for |- ( ( R C_ S /\ ( S o. S ) C_ S ) -> t++ R C_ S ) with typecode |-

Proof

Step Hyp Ref Expression
1 suceq m=sucm=suc
2 suceq sucm=sucsucsucm=sucsuc
3 1 2 syl m=sucsucm=sucsuc
4 3 fneq2d m=fFnsucsucmfFnsucsuc
5 df-1o 1𝑜=suc
6 1 5 eqtr4di m=sucm=1𝑜
7 6 fveqeq2d m=fsucm=yf1𝑜=y
8 7 anbi2d m=f=xfsucm=yf=xf1𝑜=y
9 df1o2 1𝑜=
10 6 9 eqtrdi m=sucm=
11 10 raleqdv m=asucmfaRfsucaafaRfsuca
12 0ex V
13 fveq2 a=fa=f
14 suceq a=suca=suc
15 14 5 eqtr4di a=suca=1𝑜
16 15 fveq2d a=fsuca=f1𝑜
17 13 16 breq12d a=faRfsucafRf1𝑜
18 12 17 ralsn afaRfsucafRf1𝑜
19 11 18 bitrdi m=asucmfaRfsucafRf1𝑜
20 4 8 19 3anbi123d m=fFnsucsucmf=xfsucm=yasucmfaRfsucafFnsucsucf=xf1𝑜=yfRf1𝑜
21 20 exbidv m=ffFnsucsucmf=xfsucm=yasucmfaRfsucaffFnsucsucf=xf1𝑜=yfRf1𝑜
22 21 imbi1d m=ffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyffFnsucsucf=xf1𝑜=yfRf1𝑜xSy
23 22 albidv m=yffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyyffFnsucsucf=xf1𝑜=yfRf1𝑜xSy
24 23 imbi2d m=RSSSSyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyRSSSSyffFnsucsucf=xf1𝑜=yfRf1𝑜xSy
25 suceq m=isucm=suci
26 suceq sucm=sucisucsucm=sucsuci
27 25 26 syl m=isucsucm=sucsuci
28 27 fneq2d m=ifFnsucsucmfFnsucsuci
29 25 fveqeq2d m=ifsucm=yfsuci=y
30 29 anbi2d m=if=xfsucm=yf=xfsuci=y
31 25 raleqdv m=iasucmfaRfsucaasucifaRfsuca
32 fveq2 a=bfa=fb
33 suceq a=bsuca=sucb
34 33 fveq2d a=bfsuca=fsucb
35 32 34 breq12d a=bfaRfsucafbRfsucb
36 35 cbvralvw asucifaRfsucabsucifbRfsucb
37 31 36 bitrdi m=iasucmfaRfsucabsucifbRfsucb
38 28 30 37 3anbi123d m=ifFnsucsucmf=xfsucm=yasucmfaRfsucafFnsucsucif=xfsuci=ybsucifbRfsucb
39 38 exbidv m=iffFnsucsucmf=xfsucm=yasucmfaRfsucaffFnsucsucif=xfsuci=ybsucifbRfsucb
40 fneq1 f=gfFnsucsucigFnsucsuci
41 fveq1 f=gf=g
42 41 eqeq1d f=gf=xg=x
43 fveq1 f=gfsuci=gsuci
44 43 eqeq1d f=gfsuci=ygsuci=y
45 42 44 anbi12d f=gf=xfsuci=yg=xgsuci=y
46 fveq1 f=gfb=gb
47 fveq1 f=gfsucb=gsucb
48 46 47 breq12d f=gfbRfsucbgbRgsucb
49 48 ralbidv f=gbsucifbRfsucbbsucigbRgsucb
50 40 45 49 3anbi123d f=gfFnsucsucif=xfsuci=ybsucifbRfsucbgFnsucsucig=xgsuci=ybsucigbRgsucb
51 50 cbvexvw ffFnsucsucif=xfsuci=ybsucifbRfsucbggFnsucsucig=xgsuci=ybsucigbRgsucb
52 39 51 bitrdi m=iffFnsucsucmf=xfsucm=yasucmfaRfsucaggFnsucsucig=xgsuci=ybsucigbRgsucb
53 52 imbi1d m=iffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyggFnsucsucig=xgsuci=ybsucigbRgsucbxSy
54 53 albidv m=iyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyyggFnsucsucig=xgsuci=ybsucigbRgsucbxSy
55 eqeq2 y=zgsuci=ygsuci=z
56 55 anbi2d y=zg=xgsuci=yg=xgsuci=z
57 56 3anbi2d y=zgFnsucsucig=xgsuci=ybsucigbRgsucbgFnsucsucig=xgsuci=zbsucigbRgsucb
58 57 exbidv y=zggFnsucsucig=xgsuci=ybsucigbRgsucbggFnsucsucig=xgsuci=zbsucigbRgsucb
59 breq2 y=zxSyxSz
60 58 59 imbi12d y=zggFnsucsucig=xgsuci=ybsucigbRgsucbxSyggFnsucsucig=xgsuci=zbsucigbRgsucbxSz
61 60 cbvalvw yggFnsucsucig=xgsuci=ybsucigbRgsucbxSyzggFnsucsucig=xgsuci=zbsucigbRgsucbxSz
62 54 61 bitrdi m=iyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyzggFnsucsucig=xgsuci=zbsucigbRgsucbxSz
63 62 imbi2d m=iRSSSSyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSz
64 suceq m=sucisucm=sucsuci
65 suceq sucm=sucsucisucsucm=sucsucsuci
66 64 65 syl m=sucisucsucm=sucsucsuci
67 66 fneq2d m=sucifFnsucsucmfFnsucsucsuci
68 64 fveqeq2d m=sucifsucm=yfsucsuci=y
69 68 anbi2d m=sucif=xfsucm=yf=xfsucsuci=y
70 64 raleqdv m=suciasucmfaRfsucaasucsucifaRfsuca
71 67 69 70 3anbi123d m=sucifFnsucsucmf=xfsucm=yasucmfaRfsucafFnsucsucsucif=xfsucsuci=yasucsucifaRfsuca
72 71 exbidv m=suciffFnsucsucmf=xfsucm=yasucmfaRfsucaffFnsucsucsucif=xfsucsuci=yasucsucifaRfsuca
73 72 imbi1d m=suciffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
74 73 albidv m=suciyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
75 74 imbi2d m=suciRSSSSyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyRSSSSyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
76 suceq m=nsucm=sucn
77 suceq sucm=sucnsucsucm=sucsucn
78 76 77 syl m=nsucsucm=sucsucn
79 78 fneq2d m=nfFnsucsucmfFnsucsucn
80 76 fveqeq2d m=nfsucm=yfsucn=y
81 80 anbi2d m=nf=xfsucm=yf=xfsucn=y
82 76 raleqdv m=nasucmfaRfsucaasucnfaRfsuca
83 79 81 82 3anbi123d m=nfFnsucsucmf=xfsucm=yasucmfaRfsucafFnsucsucnf=xfsucn=yasucnfaRfsuca
84 83 exbidv m=nffFnsucsucmf=xfsucm=yasucmfaRfsucaffFnsucsucnf=xfsucn=yasucnfaRfsuca
85 84 imbi1d m=nffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
86 85 albidv m=nyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
87 86 imbi2d m=nRSSSSyffFnsucsucmf=xfsucm=yasucmfaRfsucaxSyRSSSSyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
88 breq12 f=xf1𝑜=yfRf1𝑜xRy
89 88 biimpa f=xf1𝑜=yfRf1𝑜xRy
90 89 3adant1 fFnsucsucf=xf1𝑜=yfRf1𝑜xRy
91 ssbr RSxRyxSy
92 91 adantr RSSSSxRyxSy
93 90 92 syl5 RSSSSfFnsucsucf=xf1𝑜=yfRf1𝑜xSy
94 93 exlimdv RSSSSffFnsucsucf=xf1𝑜=yfRf1𝑜xSy
95 94 alrimiv RSSSSyffFnsucsucf=xf1𝑜=yfRf1𝑜xSy
96 fvex fsuciV
97 eqeq2 z=fsucigsuci=zgsuci=fsuci
98 97 anbi2d z=fsucig=xgsuci=zg=xgsuci=fsuci
99 98 3anbi2d z=fsucigFnsucsucig=xgsuci=zbsucigbRgsucbgFnsucsucig=xgsuci=fsucibsucigbRgsucb
100 99 exbidv z=fsuciggFnsucsucig=xgsuci=zbsucigbRgsucbggFnsucsucig=xgsuci=fsucibsucigbRgsucb
101 breq2 z=fsucixSzxSfsuci
102 100 101 imbi12d z=fsuciggFnsucsucig=xgsuci=zbsucigbRgsucbxSzggFnsucsucig=xgsuci=fsucibsucigbRgsucbxSfsuci
103 96 102 spcv zggFnsucsucig=xgsuci=zbsucigbRgsucbxSzggFnsucsucig=xgsuci=fsucibsucigbRgsucbxSfsuci
104 simpr1 iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafFnsucsucsuci
105 sssucid sucsucisucsucsuci
106 fnssres fFnsucsucsucisucsucisucsucsucifsucsuciFnsucsuci
107 104 105 106 sylancl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsucsuciFnsucsuci
108 peano2 iωsuciω
109 108 ad2antrr iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucasuciω
110 nnord suciωOrdsuci
111 109 110 syl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaOrdsuci
112 0elsuc Ordsucisucsuci
113 111 112 syl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucasucsuci
114 113 fvresd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsucsuci=f
115 simpr2l iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaf=x
116 114 115 eqtrd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsucsuci=x
117 vex iV
118 117 sucex suciV
119 118 sucid sucisucsuci
120 fvres sucisucsucifsucsucisuci=fsuci
121 119 120 mp1i iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsucsucisuci=fsuci
122 simplr3 iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsuciasucsucifaRfsuca
123 elelsuc bsucibsucsuci
124 123 adantl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucibsucsuci
125 35 122 124 rspcdva iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucifbRfsucb
126 124 fvresd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucifsucsucib=fb
127 ordsucelsuc Ordsucibsucisucbsucsuci
128 111 127 syl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucisucbsucsuci
129 128 biimpa iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucisucbsucsuci
130 129 fvresd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucifsucsucisucb=fsucb
131 125 126 130 3brtr4d iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucifsucsucibRfsucsucisucb
132 131 ralrimiva iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucabsucifsucsucibRfsucsucisucb
133 vex fV
134 133 resex fsucsuciV
135 fneq1 g=fsucsucigFnsucsucifsucsuciFnsucsuci
136 fveq1 g=fsucsucig=fsucsuci
137 136 eqeq1d g=fsucsucig=xfsucsuci=x
138 fveq1 g=fsucsucigsuci=fsucsucisuci
139 138 eqeq1d g=fsucsucigsuci=fsucifsucsucisuci=fsuci
140 137 139 anbi12d g=fsucsucig=xgsuci=fsucifsucsuci=xfsucsucisuci=fsuci
141 fveq1 g=fsucsucigb=fsucsucib
142 fveq1 g=fsucsucigsucb=fsucsucisucb
143 141 142 breq12d g=fsucsucigbRgsucbfsucsucibRfsucsucisucb
144 143 ralbidv g=fsucsucibsucigbRgsucbbsucifsucsucibRfsucsucisucb
145 135 140 144 3anbi123d g=fsucsucigFnsucsucig=xgsuci=fsucibsucigbRgsucbfsucsuciFnsucsucifsucsuci=xfsucsucisuci=fsucibsucifsucsucibRfsucsucisucb
146 134 145 spcev fsucsuciFnsucsucifsucsuci=xfsucsucisuci=fsucibsucifsucsucibRfsucsucisucbggFnsucsucig=xgsuci=fsucibsucigbRgsucb
147 107 116 121 132 146 syl121anc iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaggFnsucsucig=xgsuci=fsucibsucigbRgsucb
148 simplrl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaRS
149 simpr3 iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaasucsucifaRfsuca
150 ssbr RSfaRfsucafaSfsuca
151 150 ralimdv RSasucsucifaRfsucaasucsucifaSfsuca
152 148 149 151 sylc iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaasucsucifaSfsuca
153 fveq2 a=sucifa=fsuci
154 suceq a=sucisuca=sucsuci
155 154 fveq2d a=sucifsuca=fsucsuci
156 153 155 breq12d a=sucifaSfsucafsuciSfsucsuci
157 156 rspcv sucisucsuciasucsucifaSfsucafsuciSfsucsuci
158 119 152 157 mpsyl iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsuciSfsucsuci
159 simpr2r iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsucsuci=y
160 158 159 breqtrd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucafsuciSy
161 breq1 z=fsucizSyfsuciSy
162 101 161 anbi12d z=fsucixSzzSyxSfsucifsuciSy
163 96 162 spcev xSfsucifsuciSyzxSzzSy
164 vex xV
165 vex yV
166 164 165 brco xSSyzxSzzSy
167 163 166 sylibr xSfsucifsuciSyxSSy
168 simplrr iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaSSS
169 168 ssbrd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSSyxSy
170 167 169 syl5 iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSfsucifsuciSyxSy
171 160 170 mpan2d iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSfsucixSy
172 147 171 embantd iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaggFnsucsucig=xgsuci=fsucibsucigbRgsucbxSfsucixSy
173 172 ex iωRSSSSfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaggFnsucsucig=xgsuci=fsucibsucigbRgsucbxSfsucixSy
174 173 com23 iωRSSSSggFnsucsucig=xgsuci=fsucibsucigbRgsucbxSfsucifFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
175 103 174 syl5 iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
176 175 3impia iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzfFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
177 176 exlimdv iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
178 177 alrimiv iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
179 178 3exp iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
180 179 a2d iωRSSSSzggFnsucsucig=xgsuci=zbsucigbRgsucbxSzRSSSSyffFnsucsucsucif=xfsucsuci=yasucsucifaRfsucaxSy
181 24 63 75 87 95 180 finds nωRSSSSyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
182 181 com12 RSSSSnωyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
183 182 ralrimiv RSSSSnωyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
184 ralcom4 nωyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSyynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
185 r19.23v nωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
186 185 albii ynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSyynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
187 184 186 bitri nωyffFnsucsucnf=xfsucn=yasucnfaRfsucaxSyynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
188 183 187 sylib RSSSSynωffFnsucsucnf=xfsucn=yasucnfaRfsucaxSy
189 brttrcl2 Could not format ( x t++ R y <-> E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) ) : No typesetting found for |- ( x t++ R y <-> E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) ) with typecode |-
190 df-br Could not format ( x t++ R y <-> <. x , y >. e. t++ R ) : No typesetting found for |- ( x t++ R y <-> <. x , y >. e. t++ R ) with typecode |-
191 189 190 bitr3i Could not format ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) <-> <. x , y >. e. t++ R ) : No typesetting found for |- ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) <-> <. x , y >. e. t++ R ) with typecode |-
192 df-br xSyxyS
193 191 192 imbi12i Could not format ( ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) -> x S y ) <-> ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) : No typesetting found for |- ( ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) -> x S y ) <-> ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) with typecode |-
194 193 albii Could not format ( A. y ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) -> x S y ) <-> A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) : No typesetting found for |- ( A. y ( E. n e. _om E. f ( f Fn suc suc n /\ ( ( f ` (/) ) = x /\ ( f ` suc n ) = y ) /\ A. a e. suc n ( f ` a ) R ( f ` suc a ) ) -> x S y ) <-> A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) with typecode |-
195 188 194 sylib Could not format ( ( R C_ S /\ ( S o. S ) C_ S ) -> A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) : No typesetting found for |- ( ( R C_ S /\ ( S o. S ) C_ S ) -> A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) with typecode |-
196 195 alrimiv Could not format ( ( R C_ S /\ ( S o. S ) C_ S ) -> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) : No typesetting found for |- ( ( R C_ S /\ ( S o. S ) C_ S ) -> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) with typecode |-
197 relttrcl Could not format Rel t++ R : No typesetting found for |- Rel t++ R with typecode |-
198 ssrel Could not format ( Rel t++ R -> ( t++ R C_ S <-> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) ) : No typesetting found for |- ( Rel t++ R -> ( t++ R C_ S <-> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) ) with typecode |-
199 197 198 ax-mp Could not format ( t++ R C_ S <-> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) : No typesetting found for |- ( t++ R C_ S <-> A. x A. y ( <. x , y >. e. t++ R -> <. x , y >. e. S ) ) with typecode |-
200 196 199 sylibr Could not format ( ( R C_ S /\ ( S o. S ) C_ S ) -> t++ R C_ S ) : No typesetting found for |- ( ( R C_ S /\ ( S o. S ) C_ S ) -> t++ R C_ S ) with typecode |-