Телеграмм чат группы haskellru страница 16535

я почти разобрался

22:45пожаловаться #1

дык а функцию замены элементов в списке на минимальный написал?

22:45пожаловаться #2

[

пока похоже на гадание с бубном, но моя нейросеть в черепушке уже почти натренировалась выдавать правильные ответы

22:45пожаловаться #3

это самое интересное

22:45пожаловаться #4

Разбираться удобно подстановками -

fix f = x
fix f = f x
fix f = f (f x)
...

22:45пожаловаться #5

[

неа

22:45пожаловаться #6

очень советую

22:46пожаловаться #7

[

допустим, функция должна иметь тип [Int] -> [Int]. Ну или с Ord a если в общем случае

22:47пожаловаться #8

да

22:47пожаловаться #9

[

значит, нам надо функцию ([Int] -> [Int]) -> [Int] -> [Int]

22:47пожаловаться #10

[

и сунуть её в fix

22:47пожаловаться #11

да не, задача не подразумевает использование fix

22:48пожаловаться #12

[

22:48пожаловаться #13

и внутри функция может быть определена через хелперы всякие

22:48пожаловаться #14

[

как вообще можно однопроходно заменить все элементы на минимальный?

22:49пожаловаться #15

Либо "однопроходно", либо там такая чёрная магия, что ты никогда не воспользуешься ей в проде

22:49пожаловаться #16

[

предлагаю сворачивать фолдом, чтоб получить одновременно length и minimum, а после сунуть в replicate

22:50пожаловаться #17

[

replicate из-за ленивости вернёт не лист, а итератор листа, т.е. фактически значение у нас есть, но ещё нет

22:51пожаловаться #18

Мне только тупое, и по факту, двухпроходное решение на ум приходит:

replace xs = fmap (const x) xs
  where
    x = minimum xs

22:51пожаловаться #19

Ну так тут DList строится, распаковка его в обычный лист - это ещё один проход