restructure the code, learning from spa-example-app

src/Session.elm

@@ -0,0 +1,12 @@
+module Session exposing (..)
+
+import Browser.Navigation as Nav
+
+type User
+    = Player Int
+    | Admin
+
+type Model
+    = LoggedIn Nav.Key User
+    | LoggedOut Nav.Key
+