anchor.diff:  ﻿open System
  +open System.Collections.Generic
   open System.IO
   open System.Text.RegularExpressions
   
  
positive.code:     unaryOp regex       // push new Regex to head of stack
      ternaryOp replace   // consume the Regex, replacement and input string
      
  /// Takes a string on the stack, scan for words, and place the individual words
  /// on the stack
  let scan () = 
      split ' '
      unaryOp2 (fun (arr : string[]) -> 
  
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 ->
  