anchor.diff:      { Graph : Graph 
         Baseline : Anthology.Baseline }
   with
  -    override this.Equals(other : System.Object) =
  -        System.Object.ReferenceEquals(this, other)
  +    override this.Equals(other : System.Object) = refEquals this other
   
       interface System.IComparable with
           member this.CompareTo(other) = compareTo this other (fun x -> x.Baseline)
  
positive.code:     { Graph : Graph
        Bookmark : Anthology.Bookmark }
  with
      override this.Equals(other : System.Object) =
          System.Object.ReferenceEquals(this, other)
  
      interface System.IComparable with
          member this.CompareTo(other) = compareTo this other (fun x -> x.Bookmark.Repository)
  
negative.code:     { Graph : Graph
        View : Anthology.View }
  with
      override this.Equals(other : System.Object) = refEquals this other
  
      interface System.IComparable with
          member this.CompareTo(other) = compareTo this other (fun x -> x.View)
  