sig val init_jeux : unit -> unit end