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

f :: [Int] -> [Int]
f xs = flip evalTardis (undefined, head xs) do
xs' <- for xs \x -> do
modifyForwards (min x)
getFuture
sendPast =<< getPast
pure xs'

> f [3, 1, 2]
[1,1,1]

вот еще одно решение той задачи

источник

14:33пожаловаться #12

adam in Haskell

мы вам перезвоним

источник

14:36пожаловаться #13

кана in Haskell

и оно безумно медленное

источник

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

Lierdakil in Haskell

ох тыж. в 100 раз.

источник

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

[

[BRM]White Rabbit in Haskell

давайте ещё на ST-монаде напишем императивный алгоритм для этого

источник

15:54пожаловаться #16

Danil Berestov in Haskell

сомневаюсь, что станет быстрее

источник

15:56пожаловаться #17

XÆA-XII in Haskell

Rewrite in rust

источник

15:58пожаловаться #18

[

[BRM]White Rabbit in Haskell

станет медленнее, но веселее

источник

16:06пожаловаться #19

[

[BRM]White Rabbit in Haskell

ещё 4-5 примеров и можно кого-то отрядить статью писать на хабр

источник

16:06пожаловаться #20