**TI83F* Program file dated 01/01/98, 06:07®8÷G,æ ÕRIEMANNÕÓê?á?×1?ÖSP?á?Ü*FUNCTION>)))))))*+ª?ª^?Ü*LOWER)BOUND>*+A?Ü*UPPER)BOUND>*+B?Ü*PARTITIONS>*+O?BqAƒOW?¶#^+X+A+Bq:5W+W‚WC?¶#^+X+B+Ap:5W+°W‚WD?^(^+X+A+BS?^'^+X+A+BU?ÎUl0?°:045SU?1:05Sc >1:05Uc >Aq:05BqAc >Bp:05BqAc >c qc ƒ20c>c qc ƒ20c?Ö1?æ*RIEMANN)SUM*+*SET)PARAMETERS*+SP+*LEFT)SUM*+L+*RIGHT)SUM*+R+*MIDPOINT)SUM*+M+*TRAPEZOID)SUM*+T+*DEF:)INTEGRAL*+DF+*QUIT*+N?ÖL?—>–1?ß?ÓI+0+Oq1?œApIW+0+ApIW+^ApIW?Ô?ÓI+0+Oq1?œApIW+^ApIW+ApIWpW+^ApIW?Ô?ÓI+1+O?œApIW+0+ApIW+^ApIWqW?Ô?Ø?á?Þ*)*+*LEFT)SUM*+C+*)*?Ø?×1?ÖR?—>–1?ß?ÓI+1+O?œApIW+0+ApIW+^ApIW?Ô?ÓI+0+Oq1?œApIW+^ApIWpW+ApIWpW+^ApIWpW?Ô?ÓI+0+Oq1?œApIW+0+ApIW+^ApIWpW?Ô?Ø?á?Þ*)*+*RIGHT)SUM*+D+*)*?Ø?×1?ÖM?—>–1?¶#^+X+Ap:5W+Bq:5W+W‚WE?ß?ÓI+0+Oq1?œApIW+0+ApIW+^Ap:5pIW?Ô?ÓI+1+O?œApIW+0+ApIW+^ApIq:5W?Ô?ÓI+0+Oq1?œApIW+^Ap:5pIW+ApIp1W+^ApIp:5W?Ô?Ø?á?Þ*)*+*MIDPOINT)SUM>*+E+*)*?Ø?×1?ÖT?—>–1?ß?CpDƒ2P?ÓI+0+Oq1?œApIW+0+ApIW+^ApIW?Ô?ÓI+1+O?œApIW+0+ApIW+^ApIW?Ô?ÓI+0+Oq1?œApIW+^ApIW+ApIp1W+^ApIp1W?Ô?Ø?á?Þ*)*+*TRAPEZOID)SUM>*+P+*)*?Ø?×1?Ô?ÖDF?—>–1?ß?ÓI+0+O?œApIW+0+ApIW+^ApIW?Ô?$^+X+A+BV?Ø?á?Þ*)*+*DEF:)INTEGRAL>*+V+*)*?Ø?×1?Ô?ÖN?á?Þ*FROM)THE)MIND)OF*+*)))MIKE+)2002*\f