ZK
давай ещё через
>>= перепишем 😅Size: a a a
2017 December 09
AP
Лучше через аппликатив!
ЗП
Ага) через лифт
AP
Ага) через лифт
Это уже попахивает code golf!
А тут этому не рады! (ну ок, я не рад 😜)
А тут этому не рады! (ну ок, я не рад 😜)
ЗП
Это уже попахивает code golf!
А тут этому не рады! (ну ок, я не рад 😜)
А тут этому не рады! (ну ок, я не рад 😜)
Я знаю ты против liftN
ZK
length (filter (uncurry (/=)) (liftA2 (,) [1..10] [2..10]))AP
length $ filter id $ (/=) <$> [1..10] <*> [2..10]ZK
filter id это конечно зачётAP
Вот это уже точно code golf :)
ZK
интересно, можно ли ещё короче посчитать кол-во True в списке из Bool
AP
length $ filter id $ liftA2 (/=) [1..10] [2..10] - уже корочеAP
Хотя не, моего вроде не короче
ZK
count id $ liftA2 (/=) [1..10] [2..10]ZK
где
count :: Num a => (b -> Bool) -> [b] -> aЗП
countBy
ЗП
С Data.List насколько я помню
AP
где
count :: Num a => (b -> Bool) -> [b] -> aЗП
А может и не) я буду дальше пиво пить
ZK
Есть minimumBy
ZK
а countBy вроде нет