diff options
Diffstat (limited to 'judge/dummy_game.ml')
-rw-r--r-- | judge/dummy_game.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/judge/dummy_game.ml b/judge/dummy_game.ml index c5be248..29fe88b 100644 --- a/judge/dummy_game.ml +++ b/judge/dummy_game.ml @@ -14,7 +14,7 @@ module Dummy : GAME = struct let op = other_player p in (g-1, l@[p, xx], if g - 1 = 0 then - if Random.int 100 = 0 then Eliminated p + if Random.int 10 = 0 then Eliminated p else if Random.int 2 = 0 then Won p else if Random.int 2 = 0 then Won op else Tie |