anchor.diff:  ﻿open System
  +open System.Collections.Generic
   open System.IO
   open System.Text.RegularExpressions
   
  
positive.code:     load<string list> "words"
      unaryOp2 (fun (words : string list) -> words |> List.iter push)
  
  
  
  
  push test
  readFile()
  replaceNonAlphanumeric()
  scan()
  removeStopWords()
  
negative.code:     while len() > 0 do
          load<Set<string>> "stop_words"
          binOp (fun (stopWords : Set<string>) word -> 
              if stopWords.Contains word |> not && word.Length >= 2
              then Some word
              else None)
  
          load<string list> "words"
          binOp2 (fun (words : string list) word ->
  