is_number Function

public function is_number(c)

returns true if the character is a number from 0 to 9.

Arguments

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

Return Value logical


Called by

proc~~is_number~~CalledByGraph proc~is_number aoc_utilities::is_number proc~check~3 problem_3::check proc~check~3->proc~is_number proc~get_number problem_3::get_number proc~check~3->proc~get_number proc~is_not_number aoc_utilities::is_not_number proc~is_not_number->proc~is_number proc~is_symbol problem_3::is_symbol proc~is_symbol->proc~is_not_number program~problem_3 problem_3 program~problem_3->proc~check~3 program~problem_3->proc~is_not_number program~problem_3->proc~is_symbol program~problem_3->proc~get_number proc~get_number->proc~is_symbol

Source Code

    logical function is_number(c)
    character(len=1),intent(in) :: c
    is_number = c >= '0' .and. c <= '9'
    end function is_number