Turn an Elm random generator into task, allowing it to be chained with other side effects.

RandomToTask.elm

-- 0.19

randomToTask : Generator a -> Task x a
randomToTask generator =
    Time.now
        |> Task.map (Tuple.first << Random.step generator << Random.initialSeed << Time.posixToMillis)


-- 0.18

randomToTask : Generator a -> Task x a
randomToTask generator =
  Time.now
    |> Task.map (Tuple.first << Random.step generator << Random.initialSeed << round)
    

Thanks for your answer. I'm aware of the effect on randomness.

I searched for a way to combine Cmds. The use case need both a Uuid (Generator) and the current Posix (Task). There is no Cmd#andThen but there is Task#andThen. This snippet is the closest solution I found so far while it's not ideal.

Interesting discussion regarding cmd chaining
https://gist.github.com/alpacaaa/13335246234042395813d97af029b10f