get_month_end Function

public pure function get_month_end(y, m)

Arguments

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

Return Value integer


Calls

proc~~get_month_end~~CallsGraph proc~get_month_end get_month_end proc~get_month_ends get_month_ends proc~get_month_end->proc~get_month_ends proc~is_leap_year~2 is_leap_year proc~get_month_ends->proc~is_leap_year~2

Called by

proc~~get_month_end~~CalledByGraph proc~get_month_end get_month_end proc~is_valid_date~2 is_valid_date proc~is_valid_date~2->proc~get_month_end proc~test_get_month_end~2 test_get_month_end proc~test_get_month_end~2->proc~get_month_end proc~parse_date parse_date proc~parse_date->proc~is_valid_date~2 proc~test_is_valid_date~2 test_is_valid_date proc~test_is_valid_date~2->proc~is_valid_date~2 proc~construct_iso8601date construct_ISO8601Date proc~construct_iso8601date->proc~parse_date proc~test_parse_date~2 test_parse_date proc~test_parse_date~2->proc~parse_date interface~iso8601date ISO8601Date interface~iso8601date->proc~construct_iso8601date

Source Code

   pure integer function get_month_end(y, m)
      integer, intent(in) :: y
      integer, intent(in) :: m
      integer, dimension(:), allocatable :: month_ends

      month_ends = get_month_ends(y)
      get_month_end = month_ends(m)

   end function get_month_end