Module Semigroup_Any.I

val (<:>) : 'a S.t -> 'a S.t -> 'a S.t