diff options
author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-11-09 23:33:35 +0100 |
---|---|---|
committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-11-09 23:33:35 +0100 |
commit | d1312672670127b2ed400dfc94cf28911ddf9dc9 (patch) | |
tree | e2a3ef417fd867c0511084349873fe6704e00c16 /judge/dummy_game.ml | |
parent | 4b900a9624cef9c28d556f2852f27720602a7c99 (diff) | |
download | CompetIA-d1312672670127b2ed400dfc94cf28911ddf9dc9.tar.gz CompetIA-d1312672670127b2ed400dfc94cf28911ddf9dc9.zip |
Improve visualization interface.
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 |