is_octal_digit Function

public elemental function is_octal_digit(c)

Checks whether c is a digit in base 8 (0 .. 7).

Arguments

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

The character to test.

Return Value logical


Source Code

   elemental logical function is_octal_digit(c)
      character(len=1), intent(in) :: c
          !! The character to test.
      is_octal_digit = (c >= "0") .and. (c <= "7")
   end function is_octal_digit