anchor.diff:          static member ( - ) (this: GenericNHelper, f) =
               match this with
               | GenericN (arity, h) -> 
  -                h.TypeDeclaration arity f
  -
  -        static member ( - ) (this: GenericNHelper, f) =
  -            match this with
  -            | GenericN (arity, h) -> 
  -                h.Method arity f
  -
  -        static member ( * ) (this: GenericNHelper, f) =
  +                h.Entity arity f
  +
  +        static member ( % ) (this: GenericNHelper, f) =
               match this with
               | GenericN (arity, h) -> 
                   h.MemberList arity f
  
positive.code:         private
          | Generic 
          | GenericNamed of string list
          member private this.MakeParameters (arity: int) isTypeDecl =
              match this with
              | GenericNamed ns ->
                  ns |> List.map (fun n -> Code.TypeParameter n)
              | _ ->
                  let genName = if isTypeDecl then "T" else "U" 
                  if arity = 1 then [ Code.TypeParameter (genName) ]
                  else List.init arity (fun x -> Code.TypeParameter (genName + string (x + 1)))
  
          member this.TypeDeclaration (arity: int) (make: list<_> -> #Code.TypeDeclaration) =
              let generics = this.MakeParameters arity true
              let x = make generics
              x.Generics <- x.Generics @ generics
              x
  
          member this.Method (arity: int) (make: list<_> -> Code.Method) =
              let generics = this.MakeParameters arity false
              let x = make generics
              x.Generics <- x.Generics @ generics
              x
  
          member this.MemberList (arity: int) (make: list<_> -> list<#Code.Member>) =
              let generics = this.MakeParameters arity false
              let xs = make generics
              xs |> List.iter (fun x ->
                  match x :> Code.Member with
  
negative.code:             xs
  
          member this.ClassMembers (arity: int) (make: list<_> -> Code.ClassMembers) =
              let generics = this.MakeParameters arity
              let xs = make generics
              match xs with
              | Code.Instance ms
  