anchor.diff:                          reliableExists.[i] <- false
                           let position = reliablePositions.[i]
   
  -                        ms.Position <- int64 position
  -                        received.Trigger (reader)
  +                        reliableStream.Position <- int64 position
  +                        received.Trigger (reliableReader)
                           reliableSeqN <- uint16 i
                       else
                           missingPackets <- true
  
positive.code:                     reliableExists.[i] <- false
                      let position = reliablePositions.[i]
  
                      ms.Position <- int64 position
                      received.Trigger (reader)
                      reliableSeqN <- uint16 i
                  else
                      missingPackets <- true
  
negative.code:     let udp = new UdpClient ()
      let received = Event<BinaryReader> ()
  
      let packetBuffer = Array.zeroCreate<byte> 1024
      let packetStream = new MemoryStream (packetBuffer)
      let packetReader = new BinaryReader (packetStream)
  
      // reliable
      let mutable reliableSeqN = 0us
      let reliableStream = new MemoryStream (65536)
      let reliableReader = new BinaryReader (reliableStream)
      let reliableWriter = new BinaryWriter (reliableStream)
  
      let reliablePositions = Array.zeroCreate<int> 65536
      let reliableExists = Array.zeroCreate<bool> 65536
  