1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
module Model.View.SignIn ( SignIn , initSignIn ) where type alias SignIn = { login : String , authentication : Maybe (Result String String) } initSignIn : SignIn initSignIn = { login = "" , authentication = Nothing }