anchor.diff:      static member private Global = SyntaxFactory.IdentifierName(SyntaxFactory.Token(SyntaxKind.GlobalKeyword))
       static member private PrefixWithGlobal name = SyntaxFactory.AliasQualifiedName(NameSyntax.Global, name)
   
  -    static member MakeQualified (parts : string array) =
  -        parts |> Array.fold
  +    static member MakeQualified (parts : string seq) =
  +        parts |> Seq.fold
               (fun a b ->
                   if a = null then
                       NameSyntax.PrefixWithGlobal (SyntaxFactory.IdentifierName(b)) :> NameSyntax
  
positive.code:     let block = SyntaxFactory.Block(SyntaxFactory.List<StatementSyntax>(statements))
      (^T : (member WithBody : BlockSyntax -> ^T) (input, block))
  
  /// get;
  let addEmptyGetter (property:PropertyDeclarationSyntax) =
      property.AddAccessorListAccessors(SyntaxFactory.AccessorDeclaration(SyntaxKind.GetAccessorDeclaration) |> withSemicolon)
  
negative.code:     static member MakeGeneric (name : string) (types : TypeSyntax seq) =
          let indexOfTilde = name.IndexOf('`')
          let name = if indexOfTilde > 0 then name.Substring(0, indexOfTilde) else name
          let typeList = SyntaxFactory.TypeArgumentList(types |> toSeparatedList)
          SyntaxFactory.GenericName(name).WithTypeArgumentList(typeList)
  
      static member FromType (t:System.Type) =
  