Simplify random steps

JanCVanB · Feb 20, 2022 · 96695ca · 96695ca
1 parent b255e0c
commit 96695ca
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/examples/scatter.roc b/examples/scatter.roc
@@ -46,9 +46,10 @@ pointCount = 100000
 randomSeed = 123
 min = 0
 max = 100000
+initial = { seed: ScatterRandom.seed32 randomSeed, value: randomSeed }
 randomPoints = List.repeat pointCount 0
-    |> List.walk { previous: { seed: ScatterRandom.seed32 randomSeed, value: randomSeed }, values: [] } (\state, _ ->
-            now = ScatterRandom.step state.previous.seed (ScatterRandom.u32 min max)
+    |> List.walk { previous: initial, values: [] } (\state, _ ->
+            now = ScatterRandom.next state.previous (ScatterRandom.u32 min max)
             x = Num.toFloat state.previous.value
             y = Num.toFloat now.value
             values = List.append state.values (P2 x y)