anchor.diff:          As<Attr> (Attrs.Animated tr view (fun el v -> DU.SetStyle el name (attr v)))
   
       let Dynamic name view =
  -        As<Attr> (Attrs.Dynamic view ignore (fun el v -> DU.SetAttr el name v))
  +        As<Attr> (Attrs.Dynamic view (fun el v -> DU.SetAttr el name v))
   
       let DynamicCustom set view =
  -        As<Attr> (Attrs.Dynamic view ignore set)
  +        As<Attr> (Attrs.Dynamic view set)
   
       let DynamicStyle name view =
  -        As<Attr> (Attrs.Dynamic view ignore (fun el v -> DU.SetStyle el name v))
  +        As<Attr> (Attrs.Dynamic view (fun el v -> DU.SetStyle el name v))
   
       let Handler name (callback: Element -> #DomEvent -> unit) =
           As<Attr> (Attrs.Static (fun el -> el.AddEventListener(name, As<DomEvent -> unit> (callback el), false)))
  
positive.code:         let rec loop node =
              match node with
              | A0 -> ()
              | A1 n -> n.Init elem; nodes.Enqueue n
              | A2 (a, b) -> loop a; loop b
              | A3 mk -> mk elem
              | A4 cb -> oar.Enqueue cb
  
negative.code:     abstract GetExitAnim : Element -> Anim
      [<Name "NSync">]
      abstract Sync : Element -> unit
  
  [<JavaScript; Sealed; Name "WebSharper.UI.Next.AnimatedAttrNode">]
  type AnimatedAttrNode<'T>(tr: Trans<'T>, view: View<'T>, push: Element -> 'T -> unit) =
  