Me sirvió para comprender la recursión, aunque me dijeron que aún no use where porque no lo aprendimos. lo tuve que modificar en un mínimo para que me compile. promedios [] = [] promedios (xs:xss) = promedio xs : promedios xss where promedio [] = 0 promedio ys = sum ys div` length ys`