x, y <- List.map2 [] [] x + y