Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed
arrows point from an interface to procedures which implement that interface.
This could include the module procedures in a generic interface or the
implementation in a submodule of an interface in a parent module.
Source Code
function d_simpson_ab_sample(f,a,b)result(sum)real(8)::f(:)real(8)::dh,a,breal(8)::suminteger::LL=size(f)dh=(b-a)/dble(L-1)sum=d_simpson_dh_sample(f,dh)end function d_simpson_ab_sample