How do I setup a macro that zeros the value of x for which f(x)=1; using bisection method?