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