diff options
| author | Marvin Borner | 2024-11-27 15:34:48 +0100 |
|---|---|---|
| committer | Marvin Borner | 2024-11-27 15:34:48 +0100 |
| commit | 82ebc97f33c8e9a5342b7bf147cfc2013231d3eb (patch) | |
| tree | 0f68db9aa77ef907b6c180e714dd17ce0376b37d /samples/fun | |
| parent | 4b38d1af08288e80a29c84fe02a40ac925331f21 (diff) | |
Fix rng state
Diffstat (limited to 'samples/fun')
| -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]] |