Тогда, соответственно, имею следующий вопрос. Вот у меня единственное место

Question

Тогда, соответственно, имею следующий вопрос. Вот у меня единственное место

в коде, где был использован рандом, а далее — та самая невероятно случайная последовательность. Подскажите, пожалуйста, как реализовать изменение состояния последовательности, чтобы каждый раз из неё возвращалось новое число?

#haskell #programming #russian

0

07.05.2023

8 ответов

22 просмотра

Лямбда-гора 2.0 Автор вопроса

кана
положи этот список в стейт, и вытаскивай элементы ...

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

0

07.05.2023

кана

Лямбда-гора 2.0
Можно, пожалуйста, подробнее, и в хаскельских терм...

контекст: import Control.Monad.State.Strict getSeed :: IO Int вариант 1: у тебя есть функция которая из прошлого числа генерит следующее next :: Int -> Int random :: MonadState Int m => m Int random = do modify' next; get main = do seed <- getSeed flip evalStateT seed do print =<< random print =<< random вариант 2: у тебя есть бесконечный список случайных чисел randoms :: Int -> [Int] random :: MonadState [Int] m => m Int random = state \(x:xs) -> (x, xs) main = do seed <- getSeed flip evalStateT (randoms seed) do print =<< random print =<< random

0

07.05.2023

Лямбда-гора 2.0 Автор вопроса

кана
контекст: import Control.Monad.State.Strict getS...

А определять getSeed никак не надо?

0

07.05.2023

кана

кана
контекст: import Control.Monad.State.Strict getS...

в принципе между вариантами разницы никакой, вариант со списком не будет сильно менее оптимальным

0

07.05.2023

Cheese Syrowiecki

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

0

08.05.2023

Лямбда-гора 2.0 Автор вопроса

Cheese Syrowiecki
список тут не нужен, я его для демонстрации исполь...

Ну я в итоге так и пытался сделать, но всё же не смог реализовать изменение состояния. Сейчас таки пытаюсь добраться до админов codeforces, чтобы random по умолчанию добавили.

0

08.05.2023

Cheese Syrowiecki

Лямбда-гора 2.0
Ну я в итоге так и пытался сделать, но всё же не с...

https://play.haskell.org/saved/ERRl8eeU

0

08.05.2023

кана · Accepted Answer

кана

положи этот список в стейт, и вытаскивай элементы по одному

0

07.05.2023

169 похожих чатов

Тогда, соответственно, имею следующий вопрос. Вот у меня единственное место

8 ответов

Похожие вопросы