| 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 | fcoresfo |  | 
						
							| 11 | 1 2 3 4 | fcoreslem3 |  | 
						
							| 12 | 11 | anim1ci |  | 
						
							| 13 |  | foco |  | 
						
							| 14 | 12 13 | syl |  | 
						
							| 15 | 1 2 3 4 5 6 | fcores |  | 
						
							| 16 | 15 | adantr |  | 
						
							| 17 |  | foeq1 |  | 
						
							| 18 | 16 17 | syl |  | 
						
							| 19 | 14 18 | mpbird |  | 
						
							| 20 | 10 19 | impbida |  |