 [1,2] =
-- mediaaux 0 0 [1,2]

-- Até agora, com frequência, repetimos o parâmetro em apenas um local 
-- do lado direito, na extremidade da chamada de outra função. Podemos
-- evitar isso omitindo o parâmetro e definindo uma função diretamente
-- em termos de outra...

somafrp = foldr (+) 0 
sizefrp = foldr 
somafrp = foldr (+) 0
somafrp = foldr (+) 0