Verify.Distributive_Lattice
L : Interface.DISTRIBUTIVE_LATTICE
include sig ... end
val distributivity : L.t -> L.t -> L.t -> bool