aboutsummaryrefslogtreecommitdiff
path: root/motus/bin/motus.ml
diff options
context:
space:
mode:
Diffstat (limited to 'motus/bin/motus.ml')
-rw-r--r--motus/bin/motus.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/motus/bin/motus.ml b/motus/bin/motus.ml
index a8a9188..638e778 100644
--- a/motus/bin/motus.ml
+++ b/motus/bin/motus.ml
@@ -76,7 +76,7 @@ let rec run len filters words =
Freq_analysis.analyse words |> Freq_analysis.pick_next_word words
in
*)
- let _, next = Entropy.analyse len words in
+ let _, next = Entropy.analyse len ~catalog:words words in
let () =
Format.fprintf Format.std_formatter "Next word will be : %s@\n" next