Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(toml_datetime), | intent(in) | :: | datetime |
pure function has_time(datetime) class(toml_datetime), intent(in) :: datetime logical :: has_time has_time = (datetime%time%hour >= 0) .and. & & (datetime%time%minute >= 0) .and. & & (datetime%time%second >= 0) end function has_time