**TI83** Solve real polynomials for ALL roots.? 0POLYSOLV0.»O?»TA>»TB>»TC>»TS>»TT>»TX?ú]+]+]?á?Þ*INPUT)POLY)]*?Ü*::: j*+]?µ]q1N?ÎNj0?Ï?Þ*DEGREE)MUST*+*BE)l)0*?Ù?Ô?Î]1j0?Ï?Þ*LEADING)COEFF*+*MUST)BE)o)0*?Ù?Ô?Ü*TOLj)*+W?0R>0µ]?°]ƒ]1]?1+N µ\?ÓI+1+N?]Ip1\1+I?Ô?N+N µ\?ÓI+2+N?1\I+Iq1?Ô?ÑNl2?ÓK+1+Nq1?\K+KA?\Kp1+KB?ÎBj0?Ï?1C>0S?Ð?βBn²A?Ï?AƒBT?1ƒ¼1pT S?STC?Ð?BƒAT?1ƒ¼1pT C?CTS?Ô>Ô?C]K?S]K?ÓJ+K+N?C\K+JpS\Kp1+JA?C\Kp1+JqS\K+JB?A\K+J?B\Kp1+J?Ô>Ô?ÓK+1+Nq1?]KC?]KS?ÓI+1+Kp1?C\I+KpS\I+Kp1A?C\I+Kp1qS\I+KB?A\I+K?B\I+Kp1?Ô>Ô?á?ÓI+1+N?Þ\I+I?Ô?ÓI+2+N?β\I+Iq1mW²\Iq1+Iq1p²\I+I?0\I+Iq1?Ô?β\Nq1+Nq2kW?Ï?\Nq1+Nq1p\N+NB?\Nq1+Nq1\N+Nq\N+Nq1\Nq1+NC?¼B q4CD?Rp1R?BpDƒ2]R?Rp1R?BqDƒ2]R?Nq2N?Ô?ÎNl1?Ï?β\N+Nq1kW?Ï?Rp1R?\N+N]R?Nq1N?Ô>Ô>Ô?ÎNj2?Ï?2+2 µ\?\1+1p\2+2B?³\C?¼B q4CD?Rp1R?BpDƒ2]R?Rp1R?BqDƒ2]R?Ð?Rp1R?\1+1]R?Ô?R+2 µ\?R+1 µ\?ÖA?á?»:»&]+»']+\?Þ*ZEROS)]>*?Ø\?Þ*²)OF*?Þ*Y)VALUES)]>*?]1?ÓI+1+R?r]p]Ip1?Ô?r]?»:²]+\?Ø\?Þ*1)TO)REFINE*?0T?ÑTj0?­T?Ô?ÎTo92?Ï?á?Þ*ZEROS)]>*?Ø\?Ù?Ð?ÓI+1+R?]IX?R]1?ÓJ+1+Rq1?rXpRqJ]Jp1?Ô?rB?RRq1]1?ÓJ+1+Rq2?rXpRqJRqJq1]Jp1?Ô?rC?B q]ICC?βCl0?Xq]IBƒC]I?Ô>Ô?×Aúb