Bastet__Option.SEMIGROUP_F
S : Bastet.Interface.SEMIGROUP
include Bastet.Interface.MAGMA
type t
val append : t -> t -> t