anchor.diff:    open Domain
     open User
     open Suave.DotLiquid
  -  open Chessie.ErrorHandling
     open Chessie
  +  open System
   
     type UserProfileViewModel = {
       Username : string
  
positive.code:       Username = userProfile.User.Username.Value
        GravatarUrl = userProfile.GravatarUrl
        IsLoggedIn = false
        IsSelf = false
        UserId = userId
        UserFeedToken = userFeed.ReadOnlyToken
        ApiKey = getStreamClient.Config.ApiKey
  
negative.code:   }
    let gravatarUrl (emailAddress : UserEmailAddress) =
      use md5 = MD5.Create()
      emailAddress.Value 
      |> System.Text.Encoding.Default.GetBytes
      |> md5.ComputeHash
      |> Array.map (fun b -> b.ToString("x2"))
  