Create secant.f90