anchor.diff:  
       val UdpClientV6 : UdpClient
   
  +    val BufferStream : MemoryStream
  +
       val Buffer : byte []
   
       val mutable receiveBufferSize : int
   
       val mutable sendBufferSize : int
  +
  +    val Aes : AesCryptoServiceProvider 
  +
  +    val Encryptor : ICryptoTransform
  +
  +    val Decryptor : ICryptoTransform
   
       new () =
           let udpClient = new UdpClient (AddressFamily.InterNetwork)
  
positive.code:         udpClient.Client.SendBufferSize <- UdpConstants.DefaultSendBufferSize
          udpClientV6.Client.SendBufferSize <- UdpConstants.DefaultSendBufferSize
  
          { 
              UdpClient = udpClient
              UdpClientV6 = udpClientV6
              Buffer = Array.zeroCreate 65536
              receiveBufferSize = UdpConstants.DefaultReceiveBufferSize
              sendBufferSize = UdpConstants.DefaultSendBufferSize
          }
  
      new (port) =
  
negative.code:         udpClient.Client.SendBufferSize <- UdpConstants.DefaultSendBufferSize
          udpClientV6.Client.SendBufferSize <- UdpConstants.DefaultSendBufferSize
  
          let buffer = Array.zeroCreate 65536
          let bufferStream = new MemoryStream (buffer)
  
          let aes = new AesCryptoServiceProvider ()
  
          let encryptor = aes.CreateEncryptor ()
  
          let decryptor = aes.CreateDecryptor ()
  
          { 
              UdpClient = udpClient
              UdpClientV6 = udpClientV6
              BufferStream = bufferStream
              Buffer = buffer
              receiveBufferSize = UdpConstants.DefaultReceiveBufferSize
              sendBufferSize = UdpConstants.DefaultSendBufferSize
              Aes = aes
              Encryptor = encryptor
              Decryptor = decryptor
          }
  
      interface IUdp with
  