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
subroutine ESMFL_StateGetFieldArray(state,NAME,ARRAY,RC)type(ESMF_State),intent(IN)::statetype(ESMF_Array),intent(OUT)::arraycharacter(len=*),intent(IN)::nameinteger,optional,intent(OUT)::rcinteger::statustype(ESMF_Field)::fieldtype(ESMF_StateItem_Flag)::itemTypecall ESMF_StateGet(state,name,itemType=itemType,rc=status)_VERIFY(STATUS)if(itemType/=ESMF_STATEITEM_FIELD)then if(present(RC))thenRC=STATUSreturn end if else call ESMF_StateGet(state,name,field,rc=status)_VERIFY(STATUS)call ESMF_FieldGet(field,Array=array,rc=status)_VERIFY(STATUS)end if_RETURN(ESMF_SUCCESS)end subroutine ESMFL_StateGetFieldArray