AK
про memoize как раз статья открытая, да :)
Size: a a a
2017 May 07
at
>In languages like Elm, functions are automatically curried and memoized.
ниче даж делать не надо получается
ниче даж делать не надо получается
AP
takeWhile из list-extra + values из maybe-extra, ну и map, естественно
AP
Что же поделать с тем, что core убогая. Вот и приходится такие вот -extra пользовать :)
AP
takeWhile из list-extra + values из maybe-extra, ну и map, естественно
тут
f будет один раз применяться к каждому элементуAP
fusing'а не будет, это не хаскель, но в остальном будет нормально
AP
как-то так выходит
takeWhileMap : (a -> Maybe b) -> List a -> List b
takeWhileMap f src =
Tuple.second
(List.foldl
(\item acc ->
case acc of
( True, res ) ->
case (f item) of
Just val -> ( True, res ++ [ val ] )
Nothing -> ( False, res )
( False, res ) -> acc)
( True, [] )
src)
такое точно не нужно писать вручную :)
AP
Если уж не хочется тащить зависимости, лучше скопипастить оттуда реализации takeWhile и values и использовать эти более общие и узкоспециализированные кирпичики для построения сложной функции.
AP
Сильноспецифические штуки типа filterMapFoldr плохо смотрятся и сложны в отладке
AP
В хаскеле stdlib побогаче, поэтому там бы я сделал
λ> import Data.Maybe
λ> import Data.List
λ> let collect f = catMaybes . takeWhile isJust . map f
λ> :t collect
collect :: (a1 -> Maybe a) -> [a1] -> [a]
AP
Кстати, судя по тому, что maybe-extra и list-extra принадлежат elm-community, можно считать, что это must have и использовать свободно и повсеместно :)
AK
выглядит очень красиво, но по-моему
f всё равно вызывается с атрибутом 9, напримерAP
нет, takeWhile отбрасывает конец
AP
Хотя да, map же "до" будет...
AK