module Char where isDigit :: Char -> Bool isDigit c = c >= '0' && c <= '9'