
val partie_init : unit -> unit
(** Fonction appelée au début de la partie. *)

val jouer_tour : unit -> unit
(** Fonction appelée à chaque tour. *)

val partie_fin : unit -> unit
(** Fonction appelée à la fin de la partie. *)
