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
impure elemental function ESMF_TimeIntervalNE(timeinterval1,timeinterval2)!! !RETURN VALUE:logical::ESMF_TimeIntervalNE! !ARGUMENTS:type(ESMF_TimeInterval),intent(in)::timeinterval1type(ESMF_TimeInterval),intent(in)::timeinterval2! !DESCRIPTION:! This method overloads the (/=) operator for the {\tt ESMF\_TimeInterval}! class. See "interface operator(/=)" above for complete description.!!EOPIinteger::localrc! Initialize output value in case of errorESMF_TimeIntervalNE=.true.! check inputsESMF_INIT_CHECK_SHALLOW_SHORT(ESMF_TimeIntervalGetInit,timeinterval1,localrc)ESMF_INIT_CHECK_SHALLOW_SHORT(ESMF_TimeIntervalGetInit,timeinterval2,localrc)! invoke C to C++ entry pointcall c_ESMC_TimeIntervalNE(timeinterval1,timeinterval2,&ESMF_TimeIntervalNE)end function ESMF_TimeIntervalNE