Verify.Semigroup
S : Interface.SEMIGROUP
include sig ... end
module I : sig ... end
val associativity : S.t -> S.t -> S.t -> bool