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
subroutine pdf_set_range_2d(self,a,b)type(pdf_kernel_2d)::selfreal(8)::a(2)real(8)::b(2)if(.not.self%status)stop"PDF_SET_RANGE: PDF not allocated"self%xmin=aself%xmax=bself%x=linspace(a(1),b(1),self%N(1),mesh=self%dx(1))self%y=linspace(a(2),b(2),self%N(2),mesh=self%dx(2))end subroutine pdf_set_range_2d