From f3e36a869b68598978e885ed30b3a425783eb24f Mon Sep 17 00:00:00 2001 From: zolfa Date: Sun, 9 Aug 2015 03:12:15 +0200 Subject: [PATCH] add some pseudo-randomness to strategy2 --- src/Strategy2.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Strategy2.hs b/src/Strategy2.hs index c95631c..39c579c 100644 --- a/src/Strategy2.hs +++ b/src/Strategy2.hs @@ -27,9 +27,9 @@ strat2 game = if new_notes == GameOver is_over _ = False ((new_game,new_notes),new_command) = if (length ok_games) > 0 - then pick 100 ok_games + then pick 741 ok_games else if (length locked_games) > 0 - then pick 100 locked_games - else pick 100 over_games + then pick 568 locked_games + else pick 412 over_games