emptyFamily :: FamilyOnlineState
emptyFamily = FamilyOnlineState {
    _channelSecrets = M.empty
  , _channelData = M.empty
  , _sessions = M.empty
  , _sessionThreads = M.empty
  , _idCounter = 0
  , _channelSequence = 0
  }
emptyFamily :: FamilyOnlineState
emptyFamily = FamilyOnlineState {
    _channelSecrets = M.empty
  , _channelData = M.empty
  , _sessions = M.empty
  , _sessionThreads = M.empty
  , _idCounter = 0
  , _channelSequence = 0
  }
emptyFamily = FamilyOnlineState {
    _channelSecrets = M.empty
  , _channelData = M.empty
  , _sessions = M.empty
  , _sessionThreads = M.empty
  , _idCounter = 0
  , _channelSequence = 0
  }