Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(toml_datetime), | intent(in) | :: | datetime |
pure function has_date(datetime) class(toml_datetime), intent(in) :: datetime logical :: has_date has_date = (datetime%date%year >= 0) .and. & & (datetime%date%month >= 0) .and. & & (datetime%date%day >= 0) end function has_date