sig
  type 'a fetched
  val fetch : string -> (string -> 'a) -> 'a Biocaml_entrez.Fetch.fetched
  val ( >>= ) :
    'a Biocaml_entrez.Fetch.fetched ->
    ('a -> 'b Biocaml_entrez.Fetch.fetched) ->
    'b Biocaml_entrez.Fetch.fetched
  val ( >|= ) :
    'a Biocaml_entrez.Fetch.fetched ->
    ('a -> 'b) -> 'b Biocaml_entrez.Fetch.fetched
end