anchor.diff:  ﻿namespace FlexSearch.Client
   
  -open System.Threading.Tasks
   open FlexSearch.Api
   open FlexSearch.Api.Errors
  +open FlexSearch.Api.Messages
  +open System
  +open System.Collections.Generic
  +open System.Net
   open System.Net.Http
  -open System
  -open System.Net
   open System.Net.Http.Formatting
  -open FlexSearch.Api.Messages
   open System.Text
  -open System.Collections.Generic
  +open System.Threading.Tasks
   
   type IIndexServiceClient = 
       abstract Connect : unit -> Task<Response<unit>>
  
positive.code:             Async.StartAsTask(this.PutHelper<unit, unit>(sprintf "/indices/%s/status/offline" indexName, ()))
          
          // Document related
          member this.AddDocument(indexName : string, document : Document) : Task<Response<CreateResponse>> = 
              document.Index <- indexName
              Async.StartAsTask
                  (this.PostHelper<Document, CreateResponse>(sprintf "/indices/%s/documents" indexName, document))
          
          member this.DeleteDocument(indexName : string, id : string) : Task<Response<unit>> = 
              failwith "Not implemented yet"
          member this.GetDocument(indexName : string, id : string) : Task<Response<Document>> = 
              Async.StartAsTask(this.GetHelper<Document>(sprintf "/indices/%s/documents/%s" indexName id))
          member this.GetTopDocuments(indexName : string, count : int) : Task<Response<SearchResults>> = 
              Async.StartAsTask(this.GetHelper<SearchResults>(sprintf "/indices/%s/documents?count=%i" indexName count))
          member this.UpdateDocument(indexName : string, document : Document) : Task<Response<unit>> = 
              document.Index <- indexName
              Async.StartAsTask
                  (this.PutHelper<Document, unit>(sprintf "/indices/%s/documents/%s" indexName document.Id, document))
  
negative.code:     member this.DeleteHelper<'U>(uri : string) = 
          async { return! this.RequestProcessor<'U>(fun () -> client.DeleteAsync(uri)) }
      interface IFlexClient with
          // Search related
          member this.Search(searchRequest : SearchQuery) : Task<Response<SearchResults>> = 
              Async.StartAsTask
                  (this.PostHelper<SearchQuery, SearchResults>
                       (sprintf "/indices/%s/search" searchRequest.IndexName, searchRequest))
          // Index related
          member this.Connect() : Task<Response<unit>> = Async.StartAsTask(this.GetHelper<unit>("/ping"))
          member this.AddIndex(index : Index) : Task<Response<CreateResponse>> = 
  