anchor.diff:              let content =
                   let checkbox (name: string) = 
                       Input [
  -                        Attr.Type "checkbox" 
  +                        Type "checkbox" 
                           Name name
                           Id name
  -                        Attr.Class "custom"
  +                        Class "custom"
                       ]
                       -- 
                       Label [
  -                        Attr.For name
  +                        For name
                           Text name
                       ] :> Pagelet
   
                   Div [
                       Attr.Data "role" "content"
  -                    Form [ Action "#"
  +                    Form [ Attr.Action "#"
                              Method "get"
                              // Name Field
                              ] -< [
                              Div [
                                 Attr.Data "role" "fieldcontain"
                                 Label [
  -                                Attr.For "name"
  +                                For "name"
                                   Text "Your name:"
                                 ]  :> _
                                 Input [
  -                                Attr.Type "text"
  -                                Attr.Name "name"
  -                                Attr.Value ""
  +                                Type "text"
  +                                Name "name"
  +                                Value ""
                                 ]  :> _
                              ]
                              // Flavour field
  
positive.code:                 
              let page = 
                  Div [Attr.Data "role" "page"
                       Attr.Id "home"
                       header  :> _
                       content :> _]
                  
  
negative.code:             let content =
                  ContentDiv() -< [ 
                      P [
                          A [ HRef ""; Text "About this app" ]               // Attr.HRef "#about"
  //                        |>! OnClick (fun _ _ -> MobileInstance.ChangePage(JQuery.Of("#about")) )
                          |>! OnClick (fun _ _ -> MobileInstance.ChangePage(JQuery.Of("#about")) )
                      ] 
  