finishing up quadrature.f90