Module type Semigroup.S

module type S = sig .. end

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