Preface_laws.Indexed_foldable
module type LAWS = sig ... end
module For (F : Preface_specs.INDEXED_FOLDABLE) : LAWS with type ('a, 'index) t := ('a, 'index) F.t