let set s =
    set s;
    let only = 
      Project.Selection.singleton self Kind.Only_Select_Dependencies
    in 
    Project.clear ~only ()