Guest User

Untitled

a guest
Dec 29th, 2017
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.63 KB | None | 0 0
  1. type alias Token =
  2. { accessToken : String
  3. , idToken : String
  4. , tokenType : String
  5. , expiresIn : Int
  6. }
  7.  
  8. type alias Model =
  9. { posts : List Post
  10. , form : Form
  11. , route : Route
  12. , user : WebData User
  13. , token : WebData Token
  14. , account : WebData ()
  15. }
  16.  
  17. initialModel : Model
  18. initialModel =
  19. { posts = List.range 1 10 |> List.map toString |> List.map initialPost
  20. , form = initialForm
  21. , route = HomeRoute
  22. , user = NotAsked
  23. , token = NotAsked
  24. , account = NotAsked
  25. }
  26.  
  27. initialForm : Form
  28. initialForm = { email = "", password = "", passwordAgain = "", postTitle = "", postBody = "" }
Add Comment
Please, Sign In to add comment