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 get_integer_digit proc~get_integer_digit_from_string get_integer_digit_from_string proc~get_integer_digit_from_string->proc~get_integer_digit proc~test_get_integer_digit~2 test_get_integer_digit proc~test_get_integer_digit~2->proc~get_integer_digit proc~read_whole_number_indexed read_whole_number_indexed proc~read_whole_number_indexed->proc~get_integer_digit_from_string proc~test_get_integer_digit_from_string~2 test_get_integer_digit_from_string proc~test_get_integer_digit_from_string~2->proc~get_integer_digit_from_string proc~construct_iso8601duration construct_ISO8601Duration proc~construct_iso8601duration->proc~read_whole_number_indexed proc~read_whole_number read_whole_number proc~read_whole_number->proc~read_whole_number_indexed proc~test_read_whole_number_indexed~2 test_read_whole_number_indexed proc~test_read_whole_number_indexed~2->proc~read_whole_number_indexed interface~iso8601duration ISO8601Duration interface~iso8601duration->proc~construct_iso8601duration proc~parse_date parse_date proc~parse_date->proc~read_whole_number proc~parse_time parse_time proc~parse_time->proc~read_whole_number proc~parse_timezone_offset parse_timezone_offset proc~parse_timezone_offset->proc~read_whole_number proc~test_read_whole_number~2 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