**TI83F* Program file 10/24/04, 15:31» ªSAMPIVWª¨ç0 ?2001+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4 ëSSOFF?2001+2+0 ëSLTCH?ç1+1+1 ?ç3+:01+10+0+0+1+0+0+0+0 ?èëE?!ëEE?ºWƒ4‚4K?ÎWk4?Ï?á?à1+1+*SAM)PIVOT)WHILE*?à3+1+*^o0*?à4+1+*E)IS)CH1)PROBE*?à5+1+*E))j*?à6+1+*^)j*?à8+1+*CBL2ƒLBPROpSVPqC*?à5+6+E?à6+6+^?à8+1+*)ANY)KEY)TO)STOP*?Ô??ç102+°1 ?ÎUl0?Ï?ÎWk4?à7+1+*U)IS)POSITIVE*?2001+1+5+1+5+1+5+0+4+0+4+0+4+1+5+0+4+1+5+1+5+1+5+0+4+0+4+0+4+1+5+0+4 ëSSB?Ð?ÎWk4?à7+1+*U)IS)NEGATIVE*?2001+1+5+0+4+1+5+0+4+0+4+0+4+1+5+0+4+1+5+0+4+1+5+0+4+0+4+0+4+1+5+0+4 ëSSB?Ô??ÎKj1