secant method root finding algorithm for fortran./;l