let hash = function |Pkg p -> Hashtbl.hash (p.Cudf.package,p.Cudf.version) |Or (p,i) -> Hashtbl.hash (p.Cudf.package,p.Cudf.version,i)