anchor.diff:      allDocsRaw includeDocs options props 
       |> asyncMap (stringToDocumentList props.converter)
   
  -let create document props = 
  +let create (document: InsertedDocument<'a>) props = 
       request "" props
       |> body document
       |> send Post
       |> asyncMap (stringToPostPutCopyResponse props.converter)
   
  -let createWithId id document props = 
  +let createWithId id (document: InsertedDocument<'a>) props = 
       request id props
       |> body document 
       |> send Put
       |> asyncMap (stringToPostPutCopyResponse props.converter)
   
  -let update id rev document props = 
  +let update id rev (document: InsertedDocument<'a>) props = 
       request id props
       |> querystring (mapFromRev rev)
       |> body document
  
positive.code: /// </summary>
  let reduce designDocName viewName options props = 
      reduceRaw designDocName viewName options props
      |> asyncMap (stringToReduction props.converter)
  
  let findRaw selector findOptions =
      let data = 
  
negative.code: module Davenport.Fsharp
  
  open Davenport.Infrastructure
  open Davenport.Converters
  open Davenport.Types
  open Newtonsoft.Json.Linq
  
  let private defaultProps =  
      { username = None 
        password = None 
        converter = FsConverter()
        databaseName = ""
        couchUrl = ""
        onWarning = Event<string>() }
  
  let database name couchUrl =
  