module Char where

isOctDigit		:: Char -> Bool
isOctDigit c       = c >= '0'   &&  c <= '7'