anchor.diff:                  "set" => (Type.ArrayOf elementType)?array * !? T<uint64>?offset ^-> T<unit>
                   "subarray" => T<int64>?``begin`` * T<int64>?``end`` ^-> self
               ]
  -        |+> Protocol [yield! Seq.cast arrayBufferViewMembers]
   
       let Int8Array = MakeTypedArray "Int8Array" T<sbyte>
       let Uint8Array = MakeTypedArray "Uint8Array" T<byte>
  
positive.code:         ]
  
  module WebWorkers =
      
      let WorkerNavigator = Class "WorkerNavigator"
      let MessagePortArray = Class "MessagePortArray"
  
      
      let WorkerUtils =     
          Interface "WorkerUtils"
          |+> [
              "importScripts" => (!+ T<string>) ^-> T<unit>
              "navigator" =? WorkerNavigator
          ]
  
      let WorkerLocation = 
          Interface "WorkerLocation"
      
      let WorkerGlobalScope = 
          let WorkerGlobalScope = Class "WorkerGlobalScope"
          WorkerGlobalScope
  
negative.code:         ]
  
      let ArrayBufferView =
          Class "ArrayBufferView"
          |+> [ yield! Seq.cast arrayBufferViewMembers ]
  
      let private MakeTypedArray typedArray (elementType: Type.Type) =
          let self = Type.New()
          Class typedArray
          |=> self
          |=> Inherits ArrayBufferView
          |+> [
                  Constructor T<unit>
                  Constructor T<uint64>
  