:: String -> Bool
isIntegerConstant = all (`elem` ['0'..'9'])

--is the symbol 
isIntegerConstant :: String -> Bool
isIntegerConstant = all (`elem` ['0'..'9'])
isIntegerConstant = all (`elem` ['0'..'9'])