anchor.diff:                                      Attr.Class "ui-block-b"
                                       ] -< [
                                       Button [
  -                                        HTML5.Attr.Data "theme" "a"
  +                                        Attr.Data "theme" "a"
                                           Attr.Type "submit"
                                           Text "Order Ice Cream"
                                       ]
  
positive.code: 
  
      [<JavaScript>] 
      let HeaderDiv() = Div [HTML5.Attr.Data "role" "header"]
  
      [<JavaScript>] 
      let ContentDiv() = Div [HTML5.Attr.Data "role" "content"]
  
      [<JavaScript>] 
      let FooterDiv() = Div [HTML5.Attr.Data "role" "footer"]
  
      [<JavaScript>] 
      let PageDiv id' = Div [HTML5.Attr.Data "role" "page"; Id id']
  
  
      [<JavaScript>]
  
negative.code: 
          let page = 
              Div [
                  Attr.Data "role" "page"
                  ] -< [
                  header
                  content
  