simp3 Subroutine

public subroutine simp3(f, fint, istart, iend, drdi)

This subroutine does an integration from istart to iend of the real function f with an extended 3-point-simpson $$\begin{equation} f_{int}=\int_{ined}^{istart} f\left(r'\right)dr' \end{equation}$$

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(*)	::	f	Function to integrate
real(kind=dp),	intent(out)			::	fint	Integrated function
integer,	intent(in)			::	istart
integer,	intent(in)			::	iend
real(kind=dp),	intent(in),		dimension(*)	::	drdi	Derivative dr/di