anchor.diff:                  | "stop typing" ->
                       socket.Broadcast ("stop typing", [{ TypingEvent.username = defaultArg state.userName "???" }])
                       state
  -                | other ->
  +                | _ ->
                       logVerbose (sprintf "Unknown command: %s" cmd)
                       state
   
  
positive.code:     static member empty = { State.userName = None }
  
  [<EntryPoint>]
  let main argv = 
      let socketio handlePackets = SocketIo(SocketIoConfig.empty, handlePackets).WebPart
  
      let mutable userCount = 0
  
negative.code:             socketio (handlePacket State.empty)
              GET >=> choose [
                  browseHome
  
                  path "/" >=> browseFileHome "index.html"
              ]
  
  