Sub Auth_SignedIn (User As FirebaseUser)
Log("SignedIn: " & User.DisplayName)
CallSub(Main, "SetState")
Log(User.Uid)
Log(User.Email)
auth.GetUserTokenId(User, False)
End Sub
Sub Auth_TokenAvailable (User As FirebaseUser, Success As Boolean, TokenId As String)
Log(TokenId)
'send tokenid to server
End Sub