module Common.Model.SignInForm
  ( SignInForm(..)
  ) where

import           Data.Aeson   (FromJSON, ToJSON)
import           Data.Text    (Text)
import           GHC.Generics (Generic)

data SignInForm = SignInForm
  { _signInForm_email    :: Text
  , _signInForm_password :: Text
  } deriving (Show, Generic)

instance FromJSON SignInForm
instance ToJSON SignInForm