| Step | Hyp | Ref | Expression | 
						
							| 1 |  | helsh |  | 
						
							| 2 |  | shocel |  | 
						
							| 3 | 1 2 | ax-mp |  | 
						
							| 4 | 3 | simprbi |  | 
						
							| 5 |  | shocss |  | 
						
							| 6 | 1 5 | ax-mp |  | 
						
							| 7 | 6 | sseli |  | 
						
							| 8 |  | hial0 |  | 
						
							| 9 | 7 8 | syl |  | 
						
							| 10 | 4 9 | mpbid |  | 
						
							| 11 |  | elch0 |  | 
						
							| 12 | 10 11 | sylibr |  | 
						
							| 13 | 12 | ssriv |  | 
						
							| 14 |  | h0elsh |  | 
						
							| 15 |  | shococss |  | 
						
							| 16 | 14 15 | ax-mp |  | 
						
							| 17 |  | choc0 |  | 
						
							| 18 | 17 | fveq2i |  | 
						
							| 19 | 16 18 | sseqtri |  | 
						
							| 20 | 13 19 | eqssi |  |