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
real(wp)function envj(n,x)integer,intent(in)::nreal(wp),intent(in)::xenvj=0.5_wp*log10(6.28_wp*n)-n*log10(1.36_wp*x/n)end function envj