anchor.diff:          packageMap
   
       member this.AssemblyMap : System.Collections.Generic.IDictionary<Anthology.AssemblyId, Assembly> =
  -        if assemblyMap |> isNull then 
  +        if assemblyMap |> isNull then
               let outputAss = anthology.Projects |> Seq.map (fun x -> x.Output)
                                                  |> Set
               assemblyMap <- anthology.Projects |> Set.map (fun x -> x.AssemblyReferences)
  
positive.code:         let app = { Anthology.Application.Name = Anthology.ApplicationId.from name
                      Anthology.Application.Publisher = pub
                      Anthology.Application.Projects = projectIds }
          let newAntho = { anthology 
                           with Applications = anthology.Applications |> Set.add app }
          Graph(newAntho)
  
  
negative.code: 
      member this.HasTests = this.Project.HasTests
  
      member this.AssemblyReferences =
          this.Project.AssemblyReferences |> Set.map (fun x -> this.Graph.AssemblyMap.[x])
  
      member this.PackageReferences =
          this.Project.PackageReferences |> Set.map (fun x -> this.Graph.PackageMap.[x])
  
      static member CollectProjects (collector : Project -> Project set) (projects : Project set) =
  