let conjdeps universe pkglist =
  let g = Defaultgraphs.PackageGraph.G.create () in
  List.iter (fun pkg ->
    Defaultgraphs.PackageGraph.conjdepgraph_int g universe pkg
  ) pkglist ;
  g