anchor.diff:           yield c1.ToString() + c2.ToString()]
           |> List.sortByDescending (fun s -> count s.[0] + count s.[1])
   
  -    identTable <- Array.ofList (oneLetterIdentifiers @ twoLettersIdentifiers)
  +    Array.ofList (oneLetterIdentifiers @ twoLettersIdentifiers)
   
   let nullOut = new StreamWriter(Stream.Null) :> TextWriter
   
  
positive.code:     if options.verbose then
          printfn "Shader size is: %d" (Printer.quickPrint code).Length
  
  let rename code =
      Printer.printMode <- Printer.SingleChar
      let codes = Renamer.renameTopLevel code Renamer.Unambiguous identTable
      computeFrequencyIdentTable codes
      Renamer.computeContextTable codes
  
      Printer.printMode <- Printer.FromTable
      let codes = Renamer.renameTopLevel code Renamer.Context identTable
      vprintf "%d identifiers renamed. " Renamer.numberOfUsedIdents
      printSize codes
      codes
  
negative.code: open System.IO
  open Microsoft.FSharp.Text
  open Options.Globals
  
  // Compute table of variables names, based on frequency
  let computeFrequencyIdentTable li =
  