get_integer_digit Function

public pure function get_integer_digit(c)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: c

Return Value integer


Called by

proc~~get_integer_digit~~CalledByGraph proc~get_integer_digit MAPL_ISO8601_DateTime::get_integer_digit proc~get_integer_digit_from_string MAPL_ISO8601_DateTime::get_integer_digit_from_string proc~get_integer_digit_from_string->proc~get_integer_digit proc~test_get_integer_digit~2 test_MAPL_ISO8601_DateTime::test_get_integer_digit proc~test_get_integer_digit~2->proc~get_integer_digit proc~read_whole_number_indexed MAPL_ISO8601_DateTime::read_whole_number_indexed proc~read_whole_number_indexed->proc~get_integer_digit_from_string proc~test_get_integer_digit_from_string~2 test_MAPL_ISO8601_DateTime::test_get_integer_digit_from_string proc~test_get_integer_digit_from_string~2->proc~get_integer_digit_from_string proc~construct_iso8601duration MAPL_ISO8601_DateTime::construct_ISO8601Duration proc~construct_iso8601duration->proc~read_whole_number_indexed proc~read_whole_number MAPL_ISO8601_DateTime::read_whole_number proc~read_whole_number->proc~read_whole_number_indexed proc~test_read_whole_number_indexed~2 test_MAPL_ISO8601_DateTime::test_read_whole_number_indexed proc~test_read_whole_number_indexed~2->proc~read_whole_number_indexed interface~iso8601duration MAPL_ISO8601_DateTime::ISO8601Duration interface~iso8601duration->proc~construct_iso8601duration proc~parse_date MAPL_ISO8601_DateTime::parse_date proc~parse_date->proc~read_whole_number proc~parse_time MAPL_ISO8601_DateTime::parse_time proc~parse_time->proc~read_whole_number proc~parse_timezone_offset MAPL_ISO8601_DateTime::parse_timezone_offset proc~parse_timezone_offset->proc~read_whole_number proc~test_read_whole_number~2 test_MAPL_ISO8601_DateTime::test_read_whole_number proc~test_read_whole_number~2->proc~read_whole_number

Source Code

   pure integer function get_integer_digit(c)
      character, intent(in) :: c
      get_integer_digit = index(DIGIT_CHARACTERS, c) - 1
   end function get_integer_digit