anchor.diff:                      d, numberSplits)
                     |> Seq.sortByDescending snd
                     |> Seq.map fst
  -                  |> Seq.map (fun d -> Path.Combine(d.FullName, "tools", PM_EXE))
  +                  |> Seq.map (fun d -> Path.Combine(d.FullName, "tools"))
   
                 let locations =
                   [
  -                  yield Path.Combine(userProfile, PM_DIR, PM_EXE)
  -                  yield Path.Combine(userProfile, ".dotnet", "tools", PM_EXE)
  +                  Path.Combine(userProfile, PM_DIR)
  +                  Path.Combine(userProfile, ".dotnet", "tools")
                     yield! nugetDirs
                   ]
  +                |> Seq.allPairs ["paket"; "paket.exe"]
  +                |> Seq.map (fun (name, dir) -> Path.Combine(dir, name))
  +
                 let result = locations |> Seq.tryFind File.Exists
                 match result with
                 | Some paketExe -> paketExe 
  
positive.code: 
  /// Walks up directory structure and tries to find paket.exe
  let findPaketExe (prioritizedSearchPaths: string seq) (baseDir: DirectoryInfo) =
      let prioritizedSearchPaths = prioritizedSearchPaths |> Seq.map (fun d -> DirectoryInfo d)
  
      // for each given directory, we look for paket.exe and .paket/paket.exe
      let getPaketAndExe (directory: DirectoryInfo) =
          match directory.GetFiles(PM_EXE) with
          | [| exe |] -> Some exe.FullName
          | _ ->
              match directory.GetDirectories(PM_DIR) with
              | [| dir |] -> 
                  match dir.GetFiles(PM_EXE) with
                  | [| exe |] -> Some exe.FullName
                  | _ -> None
              | _ -> None
  
      let allDirs =
          Seq.concat [prioritizedSearchPaths ; getDirectoryAndAllParentDirectories baseDir]
          
      allDirs
      |> Seq.choose getPaketAndExe
      |> Seq.tryHead
  
  /// Resolves absolute load script location: something like
  /// baseDir/.paket/load/scriptName
  
negative.code: 
  open System
  open System.IO
  
  let PM_DIR = ".paket"
  
  let userProfile =
  