is_valid_month Function

public pure function is_valid_month(m)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m

Return Value logical


Calls

proc~~is_valid_month~~CallsGraph proc~is_valid_month MAPL_ISO8601_DateTime::is_valid_month proc~is_between MAPL_ISO8601_DateTime::is_between proc~is_valid_month->proc~is_between

Called by

proc~~is_valid_month~~CalledByGraph proc~is_valid_month MAPL_ISO8601_DateTime::is_valid_month proc~is_valid_date MAPL_ISO8601_DateTime::is_valid_date proc~is_valid_date->proc~is_valid_month proc~test_is_valid_month~2 test_MAPL_ISO8601_DateTime::test_is_valid_month proc~test_is_valid_month~2->proc~is_valid_month proc~parse_date MAPL_ISO8601_DateTime::parse_date proc~parse_date->proc~is_valid_date proc~test_is_valid_date~2 test_MAPL_ISO8601_DateTime::test_is_valid_date proc~test_is_valid_date~2->proc~is_valid_date proc~construct_iso8601date MAPL_ISO8601_DateTime::construct_ISO8601Date proc~construct_iso8601date->proc~parse_date proc~test_parse_date~2 test_MAPL_ISO8601_DateTime::test_parse_date proc~test_parse_date~2->proc~parse_date interface~iso8601date MAPL_ISO8601_DateTime::ISO8601Date interface~iso8601date->proc~construct_iso8601date

Source Code

   pure logical function is_valid_month(m)
      integer, intent(in) :: m
      integer, parameter :: LB_MONTH = 0
      integer, parameter :: UB_MONTH = 13
      is_valid_month = is_between(LB_MONTH, UB_MONTH, m)
   end function is_valid_month