Bastet__Dual.Monoid
M : Bastet.Interface.MONOID
include Bastet.Interface.SEMIGROUP
include Bastet.Interface.MAGMA
type t
val append : t -> t -> t
val empty : t