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 test_make_grid_no_prototype()type(GridManager)::grid_managertype(ESMF_Grid)::gridinteger::statusgrid=grid_manager%make_grid(config,rc=status)! should have failed, but need to clean up otherwiseif(status==0)then call grid_manager%delete(grid)end if@assertExceptionRaised('label [GRID_TYPE:] not found')! Check that it actually failed@assertFalse(0==status,'made a grid even though there is no prototype')end subroutine test_make_grid_no_prototype