Fortran program for secant method numerical