LINUX.ORG.RU

История изменений

Исправление nezamudich, (текущая версия) :

pure (\x y z -> x + y + z) <*> f1 <*> f2 <*> f3
sum <$> sequence [f1, f2, f3]

Много их.

Исходная версия nezamudich, :

pure (\x y z -> x + y + z) <*> f1 <*> f2 <*> f3
sum <$> sequence [f1, f2, f3]