anchor.diff:  
       member this.HandleChannelEvent = processor.Post
   
  +    member this.Join () = join ()
  +    member this.Leave () = leave()
       member this.Room:Entity = room
   
   module ChatRooms =
  
positive.code:                 let alert = new UIAlertView (Title = "Room Deleted", Message = "This room no longer exists.")
                  alert.AddButton "Leave" |> ignore
                  alert.Show ()
                  alert.Clicked.Add(fun _ -> 
                      Async.startInBackgroundWithContinuation
                          (fun _ -> DB.removeChatHistoryById room.Id)
                          (fun _ ->
                              controller.Leave room.Id
                              Navigation.navigate "/home" None
                          )
                  )
              | error -> controller.HandleApiFailure error)
  
  
  
negative.code:     let join (room:Entity) =
          let _, controller =
              let controllerAdd = new ChatRoomViewController (room)
              controllerAdd.OnLeave <- leave
              rooms.AddOrUpdate (
                      room.Id,
                      (fun _ -> room, controllerAdd),
  