let pkgnames universe = Cudf.fold_packages (fun names pkg -> StringSet.add pkg.Cudf.package names ) StringSet.empty universe