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
impure elemental function ESMF_PoleTypeEqual(PoleType1,PoleType2)! !RETURN VALUE:logical::ESMF_PoleTypeEqual! !ARGUMENTS:type(ESMF_PoleKind_Flag),intent(in)::&PoleType1,&! Two igrid statuses to compare forPoleType2! equality! !DESCRIPTION:! This routine compares two ESMF PoleType statuses to see if! they are equivalent.!! The arguments are:! \begin{description}! \item[PoleType1, PoleType2]! Two igrid statuses to compare for equality! \end{description}!!EOPIESMF_PoleTypeEqual=(PoleType1%polekind==&PoleType2%polekind)end function ESMF_PoleTypeEqual