Для товарищей, успевших приобрести зависимость от
pointfree крайне полезным было бы иметь в библиотеке пару функций:
fffmap :: (Functor f1, Functor f2)=>(a->b)->f1 (f2 a)->f1 (f2 b)
fffmap = fmap fmap fmap
flipmap :: (Functor f)=>f a->(a->b)->f b
flipmap = flip fmap
Вторая просто довольно часто всплывает, а первая имеет важный частный случай
(
Read more... )