anchor.diff:                  TypedArrays.Uint8Array
                   TypedArrays.Uint8ClampedArray
                   WebSockets.WebSocket
  +                WebSockets.ReadyState
                   WebStorage.Storage
                   WebStorage.StorageEvent
               ]
  
positive.code: 
      let WebSocket =
          Class "WebSocket"
          |=> Nested [ReadyState]
          |+> Protocol
              [
                  "readyState" =? ReadyState
  
negative.code: module WebSockets =
  
      let ReadyState =
          Pattern.EnumInlines "WebSocketReadyState" [
              "Connecting", "0"
              "Open", "1"
              "Closing", "2"
  