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.
Where possible, edges connecting nodes are
given different colours to make them easier to distinguish in
large graphs.
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.
Where possible, edges connecting nodes are
given different colours to make them easier to distinguish in
large graphs.
Source Code
function newExtDataDriver(name,set_services,unusable,cap_options,rc)result(driver)type(ExtDataDriver)::drivercharacter(*),intent(in)::nameprocedure()::set_servicesclass(KeywordEnforcer),optional,intent(in)::unusableclass(MAPL_CapOptions),optional,intent(in)::cap_optionsinteger,optional,intent(out)::rcinteger::status_UNUSED_DUMMY(unusable)driver%name=namedriver%set_services=>set_servicesif(present(cap_options))thendriver%cap_options=cap_optionselsedriver%cap_options=MAPL_CapOptions()endif call driver%initialize_mpi()call MAPL_Initialize(comm=MPI_COMM_WORLD,&logging_config=driver%cap_options%logging_config,&rc=status)_VERIFY(status)_RETURN(_SUCCESS)end function newExtDataDriver