aboutsummaryrefslogtreecommitdiff
path: root/judge/dummy_game.ml
diff options
context:
space:
mode:
authorAlex AUVOLAT <alex.auvolat@ens.fr>2014-11-09 23:33:35 +0100
committerAlex AUVOLAT <alex.auvolat@ens.fr>2014-11-09 23:33:35 +0100
commitd1312672670127b2ed400dfc94cf28911ddf9dc9 (patch)
treee2a3ef417fd867c0511084349873fe6704e00c16 /judge/dummy_game.ml
parent4b900a9624cef9c28d556f2852f27720602a7c99 (diff)
downloadCompetIA-d1312672670127b2ed400dfc94cf28911ddf9dc9.tar.gz
CompetIA-d1312672670127b2ed400dfc94cf28911ddf9dc9.zip
Improve visualization interface.
Diffstat (limited to 'judge/dummy_game.ml')
-rw-r--r--judge/dummy_game.ml2
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