| Step | Hyp | Ref | Expression | 
						
							| 1 |  | fcores.f |  | 
						
							| 2 |  | fcores.e |  | 
						
							| 3 |  | fcores.p |  | 
						
							| 4 |  | fcores.x |  | 
						
							| 5 |  | df-ima |  | 
						
							| 6 | 4 | rneqi |  | 
						
							| 7 | 6 | eqcomi |  | 
						
							| 8 | 7 | a1i |  | 
						
							| 9 | 5 8 | eqtr2id |  | 
						
							| 10 | 1 2 3 | fcoreslem1 |  | 
						
							| 11 | 10 | imaeq2d |  | 
						
							| 12 | 1 | ffund |  | 
						
							| 13 |  | funimacnv |  | 
						
							| 14 | 12 13 | syl |  | 
						
							| 15 |  | inss1 |  | 
						
							| 16 | 2 15 | eqsstri |  | 
						
							| 17 | 16 | a1i |  | 
						
							| 18 |  | dfss2 |  | 
						
							| 19 | 17 18 | sylib |  | 
						
							| 20 | 14 19 | eqtrd |  | 
						
							| 21 | 9 11 20 | 3eqtrd |  |