-- | Hexadecimal numbers @\'0\', \'1\', ... \'9\', \'A\', \'B\', ... \'F\'@
upperHexNumbers :: FromAscii a => (a -> t -> t) -> t -> t
upperHexNumbers cons = numbers cons . construct [65..70] cons
upperHexNumbers :: FromAscii a => (a -> t -> t) -> t -> t
upperHexNumbers cons = numbers cons . construct [65..70] cons
upperHexNumbers cons = numbers cons . construct [65..70] cons