Я хочу проверить, равны ли два списка A
и B
, т.е. a1 == b1, a2 == b2
,...
У меня есть рабочее решение:
all (\x->x) zipWith $ (==) A B
Другая идея - сделать это рекурсивно: a:as, b:bs
; проверьте a1==b1
и вызовите функцию с оставшимися списками as
и bs
. Но нет ли здесь более простого и понятного способа сделать это?