anchor.diff:      let Float2x2T = Type.Tuple [Float2T; Float2T]
       let Comparator = Obj * Obj ^-> Int
   
  -    let Date = T<IntelliFactory.WebSharper.EcmaScript.Date>
  +    let Date = T<JavaScript.Date>
       let DateTime = T<System.DateTime>
   
  -    let Element = T<IntelliFactory.WebSharper.Dom.Element>
  -    let NodeList = T<IntelliFactory.WebSharper.Dom.NodeList>
  -    let Event = T<IntelliFactory.WebSharper.Dom.Event>
  +    let Element = T<Element>
  +    let NodeList = T<NodeList>
  +    let Event = T<Event>
   
       let nameArg = String?name
   
  
positive.code:                         name => String?url * String?mimeType * (Obj?err * t ^-> O) ^-> O
                          |> WithInline (sprintf "$global.d3.%s($0, $1, function (x,y) { return $2(x,y); })" name)
                      ]
                  let doc = T<IntelliFactory.WebSharper.Dom.Document>
                  List.concat [
                      remoteMime "text" String
                      remote "json" Obj
  
negative.code:                 "alpha" => getSetVal chained Float
                  "resume" => O ^-> O
                  "tick" => O ^-> O
                  "drag" =? T<JavaScript.Function>
                  "linkDistance" => chained !?(Int + (Obj?d * Int?i ^-> Int))?distance
                  "charge" => chained !?(Int + (Obj?d * Int?i ^-> Int))?charge
              ]
  