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
pure logical function is_valid_date(date)type(date_fields),intent(in)::dateinteger,parameter::LB_DAY=0is_valid_date=is_valid_year(date%year_).and.&is_valid_month(date%month_).and.&is_between(LB_DAY,get_month_end(date%year_,date%month_)+1,date%day_)end function is_valid_date