[
я почти дошёл
Я на фолде делал
replaceWithMin :: [Int] -> [Int]
replaceWithMin l = finalList
where
(finalMin, finalList) = foldl' (\(curMin, curList) x -> (curMin min x, finalMin:curList)) (maxBound, []) l
Size: a a a
2021 June 28
t
и как тут поможет ретроактивный стейт?
ДК
Очень понравился в свое время факт про оптимизатор, что он редуцирует последовательные мапы, фильтры и фолды до единичных, применяя простое правило(похожее на гомоморфизм). Надеюсь когда-нибудь найти время, чтобы поизучать ghc
t
т.е. по сути это... промис?
DG
А зачем строка:
?
replace_with_min m [] = (m, [])
?
[
крч, мы пихаем много раз в список указатель на null, а в конце вычисления назначаем ему значение
[
гениально
[
главное - не разыменовать до сроку
DG
Да, я что-то под вечер наркоман 🤣
Выше, когда писал свой однострочник, из-за лени написал без учета пустого списка.
А сейчас почему-то "неправильно вспомнил", что это и была изначальная постановка задачи(
Надо отдохнуть)
Выше, когда писал свой однострочник, из-за лени написал без учета пустого списка.
А сейчас почему-то "неправильно вспомнил", что это и была изначальная постановка задачи(
Надо отдохнуть)
t
кстати, как тардис себя поведет, если зарезолвить его значение собой же?