let get_pts pts fname =
    try Hashtbl.find pts fname
    with Not_found -> nset_empty