` ``:1->F :FOR(X,1,3,F :DISP X :2->F :END`

will display

` ``1 2 3`

not

` ``1 3`

)

Here is my code:

` ``DISP "GUESS BELOW..." PAUSE TRACE Y1>Y2->G 1->F LBL L X+F->X IF ABS (Y1-Y2)≤5E-6 GOTO E IF (Y1<Y2)≠G -.5F->F Y1<Y2->G GOTO L LBL E ROUND(X,5->X ROUND((Y1+Y2)/2,2->Y HORIZONTAL Y VERTICAL X DISP {X,Y`

Just have the 2 graphs set to Y1 and Y2, then run this program and select a point left of the intersection (closer=faster). X is correct to 5 decimal places, and Y is usually only around 2.

]]>