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.
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
function construct_ISO8601Time(isostring,rc)result(time)character(len=*),intent(in)::isostringinteger,intent(inout)::rctype(ISO8601Time)::timetype(time_fields)::fieldsfields=parse_time(trim(adjustl(isostring)))if(fields%is_valid_)thentime%hour_=fields%hour_time%minute_=fields%minute_time%second_=fields%second_time%millisecond_=fields%millisecond_time%timezone_offset_=fields%timezone_offset__RETURN(_SUCCESS)else_FAIL('Invalid ISO 8601 time string')end if_RETURN(_SUCCESS)end function construct_ISO8601Time