anchor.diff:      member __.FindByExpressionAsync (exp, ?options): Task<IEnumerable<'doctype>> = 
           failwith "Not implemented"
   
  -    member __.FindByObjectAsync (obj, ?options): Task<IEnumerable<'doctype>> =
  -        failwith "Not implemented"
  -
       member __.FindBySelectorAsync (dict, ?options): Task<IEnumerable<'doctype>> = 
  -        failwith "Not implemented"
  +        // TODO: Convert options param to FindOption list
  +        dict 
  +        |> dictToMap findExpressionToFs 
  +        |> find options 
  +        <| client 
  +        |> task
   
       member __.CountAsync(): Task<int> = 
           client 
  
positive.code:     member __.ExistsByExpressionAsync (expr): Task<bool> = 
          failwith "Not implemented"
  
      member __.ExistsByObjectAsync (obj): Task<bool> = 
          failwith "Not implemented"
  
      member __.ExistsBySelectorAsync (dict): Task<bool> = 
          failwith "Not implemented"
  
      member __.ListWithDocsAsync (?options): Task<ListResponse<'doctype>> =
          failwith "Not implemented"
  
negative.code:         |> List.filter Option.isSome 
          |> List.map Option.get
  
      let findExpressionToFs (o: FindExpression) = 
          [
              Option.ofObj o.EqualTo |> Option.map FindOperator.EqualTo
              Option.ofObj o.NotEqualTo |> Option.map FindOperator.NotEqualTo
              Option.ofObj o.GreaterThan |> Option.map FindOperator.GreaterThan
              Option.ofObj o.GreaterThanOrEqualTo |> Option.map FindOperator.GreaterThanOrEqualTo
              Option.ofObj o.LesserThan |> Option.map FindOperator.LesserThan 
              Option.ofObj o.LesserThanOrEqualTo |> Option.map FindOperator.LessThanOrEqualTo
          ]
          |> List.filter Option.isSome
          |> List.map Option.get
  
      let dictToMap fn (dict: Dictionary<'a, 'b>) = 
          dict 
          |> Seq.map (fun kvp -> kvp.Key, fn kvp.Value)
          |> Map.ofSeq
  
      let task = Async.StartAsTask
  
      new(couchUrl, databaseName) = Client(Configuration(couchUrl, databaseName))
  