anchor.diff:  
                   Configuration.SaveBranch x
                   pullMatchingBinaries ()
  +                Install()
       | None -> let name = Configuration.LoadBranch()
                 printfn "%s" name
   
  
positive.code: 
      Configuration.SaveBranch tag.Branch
      Core.BuildArtifacts.PullReferenceBinaries graph.ArtifactsDir checkoutInfo.Version
  
  
  let Install () =
      Core.Package.RestorePackages ()
      Core.Conversion.GenerateProjectArtifacts()
  
  let Init (initInfo : CLI.Commands.InitWorkspace) =
      let wsDir = DirectoryInfo(initInfo.Path)
  
negative.code: 
  
  
  let Install () =
      Core.Package.RestorePackages ()
      Core.Conversion.GenerateProjectArtifacts()
  
  
  let Branch (branchInfo : CLI.Commands.BranchWorkspace) =
      let wsDir = Env.GetFolder Env.Folder.Workspace
  
      let switchToBranch (branch : string option) (repo : Repository) =
  