anchor.diff:      |> Seq.iter (fun doc ->
           eprintfn "downloading \"%s\" from %s" doc.DisplayTitle doc.DownloadLink
           if download doc then
  -            System.Threading.Thread.Sleep 5000)
  +           System.Threading.Thread.Sleep 5000)
   
   let extractText () =
       let extract = xpdf.extractText @"C:\utils\xpdfbin-win-3.04\bin64\pdftotext.exe"
  
positive.code: |> Seq.collect parseSentiment
  |> Seq.iter (fun (docid, idx, sent, sv) ->
      fprintfn sfile "%s,%d,%s,%d" docid idx sent sv)
  sfile.Close()
negative.code: #r "System.Net.Http.dll"
  #r @"c:\src\commentduel\master\retriever\packages\FSharp.Data.2.3.2\lib\net40\FSharp.Data.dll"
  #r @"c:\src\commentduel\master\retriever\packages\FSharp.Data.TypeProviders.5.0.0.2\lib\net40\FSharp.Data.TypeProviders.dll"
  