anchor.diff:          result |> assertFieldValue 3 "i2" "4"
           result |> assertFieldValue 4 "i2" "5"
   
  +    interface IDisposable with
  +        member __.Dispose() = test <@ indexService.DeleteIndex index.IndexName |> succeeded @>
  +
   type ``Highlighting Tests``(index : Index, searchService : ISearchService, indexService : IIndexService, documentService : IDocumentService) = 
       let testData = """
   id,et1,h1
  
positive.code:         test <@ result.Documents.[0].Highlights.[0].Contains("approach") @>
          test <@ result.Documents.[0].Highlights.[0].Contains("<imp>practical</imp>") @>
          test <@ result.Documents.[0].Highlights.[0].Contains("<imp>approach</imp>") @>
  
  type ``Search profile Tests``(index : Index, searchService : ISearchService, indexService : IIndexService, documentService : IDocumentService) = 
      let testData = """
  
negative.code:         getQuery (index.IndexName, "upto1wordsapart(t1, 'comprehensive process leads')")
          |> searchAndExtract searchService
          |> assertReturnedDocsCount 1
  
      interface IDisposable with
          member __.Dispose() = test <@ indexService.DeleteIndex index.IndexName |> succeeded @>
  
  type ``Term Match Tests``(index : Index, searchService : ISearchService, indexService : IIndexService, documentService : IDocumentService) = 
      let testData = """
  