Verify.Quasigroup
Q : Interface.QUASIGROUP
include sig ... end
module I : sig ... end
val cancellative : Q.t -> Q.t -> Q.t -> bool