anchor.diff:                                                                    Socket.setOption socket (ZMQ.GSSAPI_SERVICE_PRINCIPAL ,servicePrincipal )
                                                                     Socket.setOption socket (ZMQ.GSSAPI_PLAINTEXT         ,true             )
   
  -  
  +    /// Sets all the given `SocketOption`s on the given `Socket`
       let configureSocket socket socketOptions = 
         Seq.iter (setSocketOption socket) socketOptions
     
  
positive.code: 
  open System
  
  [<Experimental "This module is not properly compatible with languages other than F#">]
  module Options =
  
    type [<Measure>] bit
    type [<Measure>] b = bit
    type [<Measure>] kilobit
    type [<Measure>] kb = kilobit
    type [<Measure>] second = FSharp.Data.UnitSystems.SI.UnitNames.second
    type [<Measure>] s = second
    type [<Measure>] millisecond
    type [<Measure>] ms = millisecond
    type [<Measure>] Byte
    type [<Measure>] B = Byte
    type [<Measure>] NetworkHop
    type [<Measure>] hop = NetworkHop
    
    /// Socket options
    type SocketOption =
      /// I/O thread affinity bit-mask
      | Affinity of bitmask:uint64
  
negative.code:     /// Make socket act as a GSSAPI client, disabling encryption.
      | GssapiClientUnencripted of principal:string * servicePrincipal:string
    
    /// Contains functions for configuring sockets and patterns for interogating sockets
    [<AutoOpen;CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
    module SocketOption =
      /// Sets the given `SocketOption` on the given `Socket`
      let setSocketOption socket option =
        match option with
        // general options
  