Preface_laws.Foldable
module type LAWS = sig ... end
module For (F : Preface_specs.FOLDABLE) : LAWS with type 'a t := 'a F.t