Fortran program for secant method root