module type EVENT = sig .. end
sig
end
type t
val pp : Format.formatter -> t -> unit
Format.formatter -> t -> unit
val show : t -> string
t -> string