Zip sur une liste 2D dans Haskell

Question

Je veux combiner deux listes 2 dimensions en Haskell utilisant zip, à savoir obtenir quelque chose comme ça

[[1,2,3],   [[10, 11, 12],   [[(1, 10), (2, 11), (3, 12)], 
[4,5,6], `zip'` [13, 14, 15], ->  [(4, 13), (5, 14), (6, 15)], 
[7,8,9]]   [16, 17, 18]]   [(7, 16), (8, 17), (9, 18)]] 

sans utiliser toutes les fonctions en dehors du Prélude. Est-il possible de faire cela, en utilisant map peut-être? Le problème est que l'on ne peut pas mapzip sur deux listes.

Answer 1

zip' = zipWith zip 

Nice, est-ce pas?