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:         static member ( - ) (this: GenericHelper, f) =
              this.Entity 4 (fun x -> f x.[0] x.[1] x.[2] x.[3])
  
      let WithConstraint (constraints: list<Type.IType>) (ty: Type.IType) =
          match ty.Type with
          | Type.GenericType (_, cs) -> cs := constraints |> List.map (fun t -> t.Type)
          | _ -> ()
          ty
  
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
  