Module Monoid.Any

module Any: S  with type t = bool

type t 
val append : t -> t -> t
val zero : t