anchor.diff:  
   module View =
   
  +    open Model
       open IntelliFactory.WebSharper.Html
   
       [<JavaScript>]
  
positive.code:                     [
                          Attr.Style "border:solid 1px #bbb;margin:10px;padding:5px"
                          B [Text "Summary: "] :> IPagelet
                          Text (Model.User.Pretty u)
                      ]
                  | Failure msgs ->
                      [
  
negative.code:             + if u.isMale then ", male" else ", female"
              + if u.comments = "" then ", no comment" else ("; " + u.comments)
  
  module ViewModel =
  
      open Model
  
  