module type PLAYER = sig .. end
sig
end
type t
type vertex
val get_initial : t -> vertex
t -> vertex
val is_final : t -> vertex -> bool
t -> vertex -> bool
val turn : t -> vertex -> bool