about summary refs log tree commit diff
path: root/lib
diff options
context:
space:
mode:
authorsternenseemann <git@lukasepple.de>2017-09-08 12:28:26 +0200
committersternenseemann <git@lukasepple.de>2017-09-08 12:28:26 +0200
commit8a519427072b52ed72056a80269e7666a9165af8 (patch)
tree5d53f8364780a25cab84f864ee97544acf257669 /lib
parented32f62724227c02261ce4b26f49b475db342cc2 (diff)
Use new PRNG
Diffstat (limited to 'lib')
-rw-r--r--lib/Sound/Likely.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Sound/Likely.hs b/lib/Sound/Likely.hs
index 7e22c9e..8eb7cda 100644
--- a/lib/Sound/Likely.hs
+++ b/lib/Sound/Likely.hs
@@ -56,7 +56,7 @@ interpretation gen graph n = (nMusic n) :+:
         recurse edges =
           if S.null edges
             then emptyMusic
-            else interpretation gen graph
+            else interpretation gen' graph
                  . eTo . edgeForRoll prob $ edges
 
 edgeForRoll :: Probability -> S.Set Edge -> Edge