| Step | 
						Hyp | 
						Ref | 
						Expression | 
					
						
							| 1 | 
							
								
							 | 
							imadmrn | 
							 |-  ( F " dom F ) = ran F  | 
						
						
							| 2 | 
							
								
							 | 
							imadif | 
							 |-  ( Fun `' F -> ( F " ( dom F \ A ) ) = ( ( F " dom F ) \ ( F " A ) ) )  | 
						
						
							| 3 | 
							
								2
							 | 
							sseq1d | 
							 |-  ( Fun `' F -> ( ( F " ( dom F \ A ) ) C_ ( F " A ) <-> ( ( F " dom F ) \ ( F " A ) ) C_ ( F " A ) ) )  | 
						
						
							| 4 | 
							
								
							 | 
							ssundif | 
							 |-  ( ( F " dom F ) C_ ( ( F " A ) u. ( F " A ) ) <-> ( ( F " dom F ) \ ( F " A ) ) C_ ( F " A ) )  | 
						
						
							| 5 | 
							
								
							 | 
							unidm | 
							 |-  ( ( F " A ) u. ( F " A ) ) = ( F " A )  | 
						
						
							| 6 | 
							
								5
							 | 
							sseq2i | 
							 |-  ( ( F " dom F ) C_ ( ( F " A ) u. ( F " A ) ) <-> ( F " dom F ) C_ ( F " A ) )  | 
						
						
							| 7 | 
							
								
							 | 
							id | 
							 |-  ( ( F " dom F ) C_ ( F " A ) -> ( F " dom F ) C_ ( F " A ) )  | 
						
						
							| 8 | 
							
								
							 | 
							imassrn | 
							 |-  ( F " A ) C_ ran F  | 
						
						
							| 9 | 
							
								8 1
							 | 
							sseqtrri | 
							 |-  ( F " A ) C_ ( F " dom F )  | 
						
						
							| 10 | 
							
								9
							 | 
							a1i | 
							 |-  ( ( F " dom F ) C_ ( F " A ) -> ( F " A ) C_ ( F " dom F ) )  | 
						
						
							| 11 | 
							
								7 10
							 | 
							eqssd | 
							 |-  ( ( F " dom F ) C_ ( F " A ) -> ( F " dom F ) = ( F " A ) )  | 
						
						
							| 12 | 
							
								6 11
							 | 
							sylbi | 
							 |-  ( ( F " dom F ) C_ ( ( F " A ) u. ( F " A ) ) -> ( F " dom F ) = ( F " A ) )  | 
						
						
							| 13 | 
							
								4 12
							 | 
							sylbir | 
							 |-  ( ( ( F " dom F ) \ ( F " A ) ) C_ ( F " A ) -> ( F " dom F ) = ( F " A ) )  | 
						
						
							| 14 | 
							
								3 13
							 | 
							biimtrdi | 
							 |-  ( Fun `' F -> ( ( F " ( dom F \ A ) ) C_ ( F " A ) -> ( F " dom F ) = ( F " A ) ) )  | 
						
						
							| 15 | 
							
								14
							 | 
							imp | 
							 |-  ( ( Fun `' F /\ ( F " ( dom F \ A ) ) C_ ( F " A ) ) -> ( F " dom F ) = ( F " A ) )  | 
						
						
							| 16 | 
							
								1 15
							 | 
							eqtr3id | 
							 |-  ( ( Fun `' F /\ ( F " ( dom F \ A ) ) C_ ( F " A ) ) -> ran F = ( F " A ) )  | 
						
						
							| 17 | 
							
								16
							 | 
							ex | 
							 |-  ( Fun `' F -> ( ( F " ( dom F \ A ) ) C_ ( F " A ) -> ran F = ( F " A ) ) )  | 
						
						
							| 18 | 
							
								
							 | 
							df-ima | 
							 |-  ( F " A ) = ran ( F |` A )  | 
						
						
							| 19 | 
							
								18
							 | 
							eqcomi | 
							 |-  ran ( F |` A ) = ( F " A )  | 
						
						
							| 20 | 
							
								19
							 | 
							sseq2i | 
							 |-  ( ( F " ( dom F \ A ) ) C_ ran ( F |` A ) <-> ( F " ( dom F \ A ) ) C_ ( F " A ) )  | 
						
						
							| 21 | 
							
								19
							 | 
							eqeq2i | 
							 |-  ( ran F = ran ( F |` A ) <-> ran F = ( F " A ) )  | 
						
						
							| 22 | 
							
								17 20 21
							 | 
							3imtr4g | 
							 |-  ( Fun `' F -> ( ( F " ( dom F \ A ) ) C_ ran ( F |` A ) -> ran F = ran ( F |` A ) ) )  |