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 local_esmf_timeset(yymmdd,hhmmss,rc)result(etime)type(ESMF_Time)::etimeinteger,intent(in)::yymmddinteger,intent(in)::hhmmssinteger,intent(out),optional::rcinteger::year,month,day,hour,minute,second,statusyear=yymmdd/10000month=mod(yymmdd/100,100)day=mod(yymmdd,100)hour=hhmmss/10000minute=mod(hhmmss/100,100)second=mod(hhmmss,100)call ESMF_TimeSet(etime,yy=year,mm=month,dd=day,h=hour,m=minute,s=second,_RC)if(present(rc))thenrc=_SUCCESSendif end function local_esmf_timeset