anchor.diff:  open System.IO
   open System.Net
   open System.Text
  +open System.Text.RegularExpressions
   open Fake
   open Newtonsoft.Json
   
  +/// The release type of the app
   type ReleaseType = Beta = 0 | Store = 1 | Alpha = 2 | Enterprise = 3
   
  +/// HockeyApp's success response
   type HockeyResponse = {
       Title : string
       
  
positive.code: 
  /// [omit]
  let private toCurlArgs param = seq {
      yield sprintf "-H \"X-HockeyAppToken:%s\"" param.ApiToken
      yield sprintf "-F \"ipa=@%s\"" param.File
      yield sprintf "-F \"notes=%s\"" param.Notes
      yield sprintf "-F \"release_type=%i\"" (int param.ReleaseType)
      yield "https://rink.hockeyapp.net/api/2/apps/upload"
  }
  
  
negative.code:     /// Release notes for the build
      Notes: string    
  
      /// Set the release type of the app
      ReleaseType: ReleaseType
  
      /// Set the owner of the app
      OwnerId: string
  }
  
  /// The default HockeyApp parameters
  