Preface_laws.Lattice
module type LAWS = sig ... end
module For (L : Preface_specs.LATTICE) : LAWS with type t := L.t