anchor.diff:      let Internal x = Access Code.AccessModifier.Internal x
   
       /// Marks an entity with the Obsolete attribute.
  -    let Obsolete<'T when 'T :> Code.Entity> (x: 'T) =
  +    let Obsolete (x: #Code.Entity) =
           x |> Code.Entity.Update (fun x -> x.IsObsolete <- true)
   
       /// Constructs a class protocol (instance members).
  
positive.code:         [ for m in members -> Instance m :> Code.IClassMember ]
  
      /// Adds a comment.
      let WithComment<'T when 'T :> Code.Entity> (comment: string) (x: 'T) : 'T =
          x |> Code.Entity.Update (fun x -> x.Comment <- Some comment)
  
      /// Adds a source name.
      let WithSourceName<'T when 'T :> Code.Entity> (name: string) (x: 'T) : 'T =
          x |> Code.Entity.Update (fun x -> x.SourceName <- Some name)
  
      /// Adds an inline.
      let WithInline<'T when 'T :> Code.MethodBase> (code: string) (x: 'T) : 'T =
          x |> Code.Entity.Update (fun x -> x.Inline <- Some code)
  
      /// Adds an inline.
  
negative.code:     /// Constructs a new property with a getter and a setter.
      let ( =% ) name ty = Property name ty
  
      let private Access m (x: #Code.Entity) =
          let x = x.Clone() :?> 'T
          x.AccessModifier <- m
          x
  