anchor.diff:  
   [<JavaScript>]
   let TextArea (stream: Stream<string>) =
  -    let i = Default.TextArea []
  +    let i = Tags.TextArea []
       match stream.Latest with
       | Failure _ -> ()
       | Success x -> i.Value <- x
  
positive.code:     let elts =
          values
          |> List.map (fun x ->
              Default.Input [Attr.Type "radio"; Attr.Name name]
              |>! OnChange (fun div ->
                  if div.Body?``checked`` then
                      stream.Trigger(Success x)))
  
negative.code: [<JavaScript>]
  let WithLabel label element =
      let id = nextId()
      Span [Label [For id; Text label]; element -< [Id id]]
  
  [<JavaScript>]
  let WithLabelAfter label element =
      let id = nextId()
      Span [element -< [Id id]; Label [For id; Text label]]
  
  [<JavaScript>]
  [<Inline>]
  