diff options
Diffstat (limited to 'morpion_rec/Mayushii')
| -rw-r--r-- | morpion_rec/Mayushii/_tags | 2 | ||||
| l--------- | morpion_rec/Mayushii/lib | 1 | ||||
| -rw-r--r-- | morpion_rec/Mayushii/mayushii.ml | 14 |
3 files changed, 17 insertions, 0 deletions
diff --git a/morpion_rec/Mayushii/_tags b/morpion_rec/Mayushii/_tags new file mode 100644 index 0000000..c653205 --- /dev/null +++ b/morpion_rec/Mayushii/_tags @@ -0,0 +1,2 @@ +"lib": include +true: use_unix, use_graphics diff --git a/morpion_rec/Mayushii/lib b/morpion_rec/Mayushii/lib new file mode 120000 index 0000000..e834a2a --- /dev/null +++ b/morpion_rec/Mayushii/lib @@ -0,0 +1 @@ +../../judge
\ No newline at end of file diff --git a/morpion_rec/Mayushii/mayushii.ml b/morpion_rec/Mayushii/mayushii.ml new file mode 100644 index 0000000..57ec3aa --- /dev/null +++ b/morpion_rec/Mayushii/mayushii.ml @@ -0,0 +1,14 @@ + +module Mayushii : Player.IA = struct + + module G = Morpion_rec.G + + let play g = + let cc = G.possibilities g in + List.hd cc + +end + +module P = Player.P(Mayushii) + +let () = P.run() |