| Step | Hyp | Ref | Expression | 
						
							| 1 |  | fcores.f |  | 
						
							| 2 |  | fcores.e |  | 
						
							| 3 |  | fcores.p |  | 
						
							| 4 |  | fcores.x |  | 
						
							| 5 |  | fcores.g |  | 
						
							| 6 |  | fcores.y |  | 
						
							| 7 | 1 | adantr |  | 
						
							| 8 | 5 | adantr |  | 
						
							| 9 |  | simpr |  | 
						
							| 10 | 7 2 3 4 8 6 9 | fcoresf1 |  | 
						
							| 11 | 10 | ex |  | 
						
							| 12 |  | f1co |  | 
						
							| 13 | 12 | ancoms |  | 
						
							| 14 | 1 2 3 4 5 6 | fcores |  | 
						
							| 15 |  | f1eq1 |  | 
						
							| 16 | 14 15 | syl |  | 
						
							| 17 | 13 16 | imbitrrid |  | 
						
							| 18 | 11 17 | impbid |  |