modified integrands.f90