Programs from Steven Gill (gillsr@aston.ac.uk)
For the casio fx-9700GE (but prob work on all other models)
________________________________________________
.:    'print' character
>=    Greater than or equal to 
________________________________________________
Decimal Search:

Desc:     Find when both expressions are equal to 
	          12 decimal places

Notes:    Use a function in f1(f2) or replace f1(f2) with the
            desired expression  (X as the variable)
________________________________________________


"DEC SEARCH"
Mcl
Isz D
Isz X
"C>B"
Lbl 0
(f1)->B
(f2)->C
B>=C=>Goto 1
X+D->X
Goto 0
Lbl 1
B=C=>Goto 2
X-D->X:D/10->D
Goto 0
Lbl 2
"X="
X.: