Actualización de «Descomposiciones como sumas de n sumandos»
He actualizado las soluciones del ejercicio Descomposiciones como sumas de n sumandos cuyo enunciado es
Definir la función
sumas :: (Num a, Ord a) => Int -> [a] -> a -> [[a]]
tal que (sumas n ys x)
es la lista de las descomposiciones de x
como sumas de n
sumandos en la lista ys
. Por ejemplo,
sumas 2 [1,2] 3 == [[1,2]] sumas 2 [-1] (-2) == [[-1,-1]] sumas 2 [-1,3,-1] 2 == [[-1,3]] sumas 2 [1,2] 4 == [[2,2]] sumas 2 [1,2] 5 == [] sumas 3 [1,2] 5 == [[1,2,2]] sumas 3 [1,2] 6 == [[2,2,2]] sumas 2 [1,2,5] 6 == [[1,5]] sumas 2 [1,2,3,5] 4 == [[1,3],[2,2]] sumas 2 [1..5] 6 == [[1,5],[2,4],[3,3]] sumas 3 [1..5] 7 == [[1,1,5],[1,2,4],[1,3,3],[2,2,3]] sumas 3 [1..200] 4 == [[1,1,2]]