| Step | Hyp | Ref | Expression | 
						
							| 1 |  | 0r |  | 
						
							| 2 |  | 1sr |  | 
						
							| 3 |  | mulcnsr |  | 
						
							| 4 | 1 2 1 2 3 | mp4an |  | 
						
							| 5 |  | 00sr |  | 
						
							| 6 | 1 5 | ax-mp |  | 
						
							| 7 |  | 1idsr |  | 
						
							| 8 | 2 7 | ax-mp |  | 
						
							| 9 | 8 | oveq2i |  | 
						
							| 10 |  | m1r |  | 
						
							| 11 |  | 1idsr |  | 
						
							| 12 | 10 11 | ax-mp |  | 
						
							| 13 | 9 12 | eqtri |  | 
						
							| 14 | 6 13 | oveq12i |  | 
						
							| 15 |  | addcomsr |  | 
						
							| 16 |  | 0idsr |  | 
						
							| 17 | 10 16 | ax-mp |  | 
						
							| 18 | 14 15 17 | 3eqtri |  | 
						
							| 19 |  | 00sr |  | 
						
							| 20 | 2 19 | ax-mp |  | 
						
							| 21 |  | 1idsr |  | 
						
							| 22 | 1 21 | ax-mp |  | 
						
							| 23 | 20 22 | oveq12i |  | 
						
							| 24 |  | 0idsr |  | 
						
							| 25 | 1 24 | ax-mp |  | 
						
							| 26 | 23 25 | eqtri |  | 
						
							| 27 | 18 26 | opeq12i |  | 
						
							| 28 | 4 27 | eqtri |  | 
						
							| 29 | 28 | oveq1i |  | 
						
							| 30 |  | addresr |  | 
						
							| 31 | 10 2 30 | mp2an |  | 
						
							| 32 |  | m1p1sr |  | 
						
							| 33 | 32 | opeq1i |  | 
						
							| 34 | 29 31 33 | 3eqtri |  | 
						
							| 35 |  | df-i |  | 
						
							| 36 | 35 35 | oveq12i |  | 
						
							| 37 |  | df-1 |  | 
						
							| 38 | 36 37 | oveq12i |  | 
						
							| 39 |  | df-0 |  | 
						
							| 40 | 34 38 39 | 3eqtr4i |  |