M.Bounded_Meet_Semilattice
BMS : Interface.BOUNDED_MEET_SEMILATTICE
A : sig ... end
module V : sig ... end
val suite : string -> T.test T.suite