anchor.diff:  
       Configuration.SaveBranch tag.Branch
       Core.BuildArtifacts.PullReferenceBinaries graph.ArtifactsDir checkoutInfo.Version
  -
  -
  -let Install () =
  -    Core.Package.RestorePackages ()
  -    Core.Conversion.GenerateProjectArtifacts()
  +    Install()
  +
   
   let Init (initInfo : CLI.Commands.InitWorkspace) =
       let wsDir = DirectoryInfo(initInfo.Path)
  
positive.code: 
                  Configuration.SaveBranch x
                  pullMatchingBinaries ()
      | None -> let name = Configuration.LoadBranch()
                printfn "%s" name
  
  
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) =
  