Nodes of different colours represent the following:
Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
program volatile_doctest use vecfor_RPP type(vector) :: pt(1:2) pt(1) = ex + ey + ez pt(2) = pt(1) + 1 print "(L1)", pt(2) >= pt(1) endprogram volatile_doctest