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 vect_cross(e,p1,p2)real(ESMF_KIND_R8),intent(in)::p1(3),p2(3)real(ESMF_KIND_R8),intent(out)::e(3)!! Perform cross products of 3D vectors: e = P1 X P2!e(1)=p1(2)*p2(3)-p1(3)*p2(2)e(2)=p1(3)*p2(1)-p1(1)*p2(3)e(3)=p1(1)*p2(2)-p1(2)*p2(1)end subroutine vect_cross