Definí la función sumarSegun, que dada una función y una lista de elementos devuelve la suma de aplicar la función a cada uno de los elementos. Explicitá su tipo

sumarSegun :: (a -> Int) -> [a] -> Int
sumarSegun x = sum. (map x)