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 ESMF_GridStatusAssignment(string,gsval)! !ARGUMENTS:character(len=*),intent(out)::stringtype(ESMF_GridStatus_Flag),intent(in)::gsval! !DESCRIPTION:! Assign the string value of an ESMF_GridStatus_Flag!!EOPI!-------------------------------------------------------------------------------if(gsval==ESMF_GRIDSTATUS_INVALID)then write(string,'(a)')'ESMF_GRIDSTATUS_INVALID'elseif(gsval==ESMF_GRIDSTATUS_UNINIT)then write(string,'(a)')'ESMF_GRIDSTATUS_UNINIT'elseif(gsval==ESMF_GRIDSTATUS_EMPTY)then write(string,'(a)')'ESMF_GRIDSTATUS_EMPTY'elseif(gsval==ESMF_GRIDSTATUS_COMPLETE)then write(string,'(a)')'ESMF_GRIDSTATUS_COMPLETE'endif end subroutine ESMF_GridStatusAssignment