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