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_R16P type(vector_R16P) :: pt pt = 1._R8P print "(3(F3.1,1X))", abs(pt%x), abs(pt%y), abs(pt%z) endprogram volatile_doctest