diff options
Diffstat (limited to 'samples/fun/rng-state.bruijn')
-rw-r--r-- | samples/fun/rng-state.bruijn | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/samples/fun/rng-state.bruijn b/samples/fun/rng-state.bruijn index 49d77bc..2297728 100644 --- a/samples/fun/rng-state.bruijn +++ b/samples/fun/rng-state.bruijn @@ -17,6 +17,6 @@ rand-bool map even? rand # normal bind triple rand >>= [rand >>= [rand >>= [pure [0 1 2 3]]]] -:test ((triple (+50) [[1]]) =? (+595)) ([[[2]]]) +:test ((triple (+50) [[1]] [[[0]]]) =? (+595)) ([[1]]) -main string→number → triple +main string→number → triple → &[[1]] |