то я не слишком уверен, как правильно сформулировать это, но скажу, что я хотел получить сумму всех нечетных чисел в списке, есть ли у меня две функции (sumList и getOddNumbers) и объединить их в sumOddList или есть способ положить эти два вместе в одной функции? Если нет лучшей функции, как именно я бы объединил их в sumOddList?

getOddNumbers :: [Integer] -> [Integer]
getOddNumbers [] = []
getOddNumbers (x:xs)
    |odd x = x:getOddNumbers xs
    |otherwise = getOddNumbers xs

sumList :: [Integer] -> Integer
sumList list = case list of
   [] -> 0
   (x:xs) -> x + (sumList xs)

Я также спрашиваю, главным образом, потому что объединение двух функций сравнения - это то, с чем я раньше сталкивался, когда помещал цвет и форму с помощью CodeWorld для вывода формы этого цвета.

Спасибо

(Примечание: я пользуюсь Haskell чуть более 5 недель, и я совершенно нуб)