anchor.diff:              "NaN" =? T<double> |> WithGetterInline "NaN"
               "Infinity" =? T<double> |> WithGetterInline "Infinity"
               "undefined" =? T<obj> |> WithGetterInline "undefined"
  -            "eval" => T<string> ^-> T<obj> |> WithInline "eval($0)"
  -            "parseInt" => T<string> * !?T<int>?radix ^-> T<int> |> WithInline "parseInt($0, $1)"
  -            "parseFloat" => T<string->double> |> WithInline "parseFloat($0)"
  -            "isNaN" => T<obj> ^-> T<bool> |> WithInline "isNaN($0)"
  -            "isFinite" => (T<int> + T<float>) ^-> T<bool> |> WithInline "isFinite($0)"
  -            "decodeURI" => T<string->string> |> WithInline "decodeURI($0)"
  -            "decodeURIComponent" => T<string->string> |> WithInline "decodeURIComponent($0)"
  -            "encodeURI" => T<string->string> |> WithInline "encodeURI($0)"
  -            "encodeURIComponent" => T<string->string> |> WithInline "encodeURIComponent($0)"
  -        ]
  +            "eval" => T<string>?expr ^-> T<obj> |> WithInline "eval($expr)"
  +            "parseInt" => T<string>?str * !?T<int>?radix ^-> T<int> |> WithInline "parseInt($str, $radix)"
  +            "parseFloat" => T<string>?str ^-> T<double> |> WithInline "parseFloat($str)"
  +            "isNaN" => T<obj>?number ^-> T<bool> |> WithInline "isNaN($number)"
  +            "isFinite" => (T<int> + T<float>)?number ^-> T<bool> |> WithInline "isFinite($number)"
  +            "decodeURI" => T<string>?str ^-> T<string> |> WithInline "decodeURI($str)"
  +            "decodeURIComponent" => T<string>?str ^-> T<string> |> WithInline "decodeURIComponent($str)"
  +            "encodeURI" => T<string>?str ^-> T<string> |> WithInline "encodeURI($str)"
  +            "encodeURIComponent" => T<string>?str ^-> T<string> |> WithInline "encodeURIComponent($str)"
  +        ]
  +        |> ignore
   
   module WebWorkers =
   
  
positive.code:             "focus" => T<unit> ^-> T<unit>
                  |> WithComment "Makes a request to bring the window to the front"
  
              "frames" =? WindowProxyType
              "length" =? T<int>
              "top" =? WindowProxyType
              "opener" =? WindowProxyType
              "parent" =? WindowProxyType
              "frameElement" =? Dom.Interfaces.Element
              "open" => (T<string> * T<string> * T<string> * T<string>) ^->  WindowProxyType
              "open" => (T<string> * T<string> * T<string>) ^->  WindowProxyType
              "open" => (T<string> * T<string>) ^->  WindowProxyType
              "open" => (T<string>) ^->  WindowProxyType
              "open" => (T<unit>) ^->  WindowProxyType
              "close" => T<unit> ^-> T<unit>
  
              "navigator" =? Navigator
  
negative.code:             "clearRedo" => T<unit> ^-> T<unit> 
          ]
  
      let Window = Class "Window"
      let MessagePort = Class "MessagePort"
  
      let ErrorEvent =
          Class "ErrorEvent"
  