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.
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.
program volatile_doctestuse stringifor_string_ttype(string)::astringlogical::test_passed(2)astring='abcdefghilmnopqrstuvz'test_passed(1)=(astring%reverse()//''=='zvutsrqponmlihgfedcba')astring='0123456789'test_passed(2)=(astring%reverse()//''=='9876543210')print'(L1)',all(test_passed)endprogram volatile_doctest