anchor.diff:  
   
   let getCodes fileName =
  -    System.IO.File.ReadAllLines(fileName) |> Seq.map (String.trimEnd " " >> PdbCode) |> Seq.toList
  +    System.IO.File.ReadAllLines(fileName)
  +    |> Seq.map (String.trimEnd " " >> PdbCode)
  +    |> Seq.toList
   
   [<EntryPoint>]
   let main argv =
  
positive.code: module Main
  open Command
  open Download
  open System
  
negative.code: open FSharpPlus
  
  type PdbCode = PdbCode of string
  
  type FileFormat =
      | PDB
      | CIF
  
  type PdbFile =
      { Path: string
        Format: FileFormat
        Code: PdbCode }
  
  type Output =
      { Output: String
        Warnings: String
        ExitCode: int }
  
  type CalculationError =
      | CalculationFailed of Output
      | DownloadFailed of String
  
  type FreesasaResult = Result<Output, CalculationError>
  
  type ComparisonError =
      | CalculationError of CalculationError list
      | CalculationDifference
  
  type Comparison = (PdbCode * ComparisonError) option
  type ResultComparer = PdbCode -> FreesasaResult -> FreesasaResult -> Comparison
  
  