| Step | Hyp | Ref | Expression | 
						
							| 1 |  | halfpire |  | 
						
							| 2 | 1 | recni |  | 
						
							| 3 |  | simpl |  | 
						
							| 4 |  | nncan |  | 
						
							| 5 | 2 3 4 | sylancr |  | 
						
							| 6 | 5 | fveq2d |  | 
						
							| 7 |  | subcl |  | 
						
							| 8 | 2 3 7 | sylancr |  | 
						
							| 9 |  | coshalfpim |  | 
						
							| 10 | 8 9 | syl |  | 
						
							| 11 | 6 10 | eqtr3d |  | 
						
							| 12 | 5 | adantr |  | 
						
							| 13 |  | picn |  | 
						
							| 14 | 13 | a1i |  | 
						
							| 15 |  | pire |  | 
						
							| 16 |  | pipos |  | 
						
							| 17 | 15 16 | gt0ne0ii |  | 
						
							| 18 | 17 | a1i |  | 
						
							| 19 | 8 14 18 | divcan1d |  | 
						
							| 20 | 19 | adantr |  | 
						
							| 21 |  | zre |  | 
						
							| 22 | 21 | adantl |  | 
						
							| 23 |  | remulcl |  | 
						
							| 24 | 22 15 23 | sylancl |  | 
						
							| 25 | 20 24 | eqeltrrd |  | 
						
							| 26 |  | resubcl |  | 
						
							| 27 | 1 25 26 | sylancr |  | 
						
							| 28 | 12 27 | eqeltrrd |  | 
						
							| 29 | 28 | rered |  | 
						
							| 30 |  | simplr |  | 
						
							| 31 | 29 30 | eqeltrrd |  | 
						
							| 32 |  | 0zd |  | 
						
							| 33 |  | elioore |  | 
						
							| 34 |  | resubcl |  | 
						
							| 35 | 1 33 34 | sylancr |  | 
						
							| 36 | 15 | a1i |  | 
						
							| 37 |  | eliooord |  | 
						
							| 38 | 37 | simprd |  | 
						
							| 39 |  | posdif |  | 
						
							| 40 | 33 1 39 | sylancl |  | 
						
							| 41 | 38 40 | mpbid |  | 
						
							| 42 | 16 | a1i |  | 
						
							| 43 | 35 36 41 42 | divgt0d |  | 
						
							| 44 | 1 | a1i |  | 
						
							| 45 | 2 | negcli |  | 
						
							| 46 | 13 2 | negsubi |  | 
						
							| 47 |  | pidiv2halves |  | 
						
							| 48 | 13 2 2 47 | subaddrii |  | 
						
							| 49 | 46 48 | eqtri |  | 
						
							| 50 | 2 13 45 49 | subaddrii |  | 
						
							| 51 | 37 | simpld |  | 
						
							| 52 | 50 51 | eqbrtrid |  | 
						
							| 53 | 44 36 33 52 | ltsub23d |  | 
						
							| 54 | 13 | mulridi |  | 
						
							| 55 | 53 54 | breqtrrdi |  | 
						
							| 56 |  | 1red |  | 
						
							| 57 |  | ltdivmul |  | 
						
							| 58 | 35 56 36 42 57 | syl112anc |  | 
						
							| 59 | 55 58 | mpbird |  | 
						
							| 60 |  | 1e0p1 |  | 
						
							| 61 | 59 60 | breqtrdi |  | 
						
							| 62 |  | btwnnz |  | 
						
							| 63 | 32 43 61 62 | syl3anc |  | 
						
							| 64 | 31 63 | syl |  | 
						
							| 65 | 64 | pm2.01da |  | 
						
							| 66 |  | sineq0 |  | 
						
							| 67 | 8 66 | syl |  | 
						
							| 68 | 67 | necon3abid |  | 
						
							| 69 | 65 68 | mpbird |  | 
						
							| 70 | 11 69 | eqnetrd |  |