anchor.diff: -﻿// Learn more about F# at http://fsharp.org. See the 'F# Tutorial' project
  -// for more guidance on F# programming.
  -
   #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"
  
positive.code: 
  (*
  let runSentiment batchSize =
      let client = CognitiveServices.getClient "455d87e6819c43fcb7284efba4e56df9"
      let getId file = Path.GetFileNameWithoutExtension(file).Substring(4)
      let read file = File.ReadAllText file
      Directory.EnumerateFiles(@"c:\data\dpd\documents\txt", "doc-*.txt")
  
negative.code: |> Seq.collect parseSentiment
  |> Seq.iter (fun (docid, idx, sent, sv) ->
      fprintfn sfile "%s,%d,%s,%d" docid idx sent sv)
  sfile.Close()
  