module Common.Model.SignIn ( SignIn(..) ) where import Data.Aeson (FromJSON, ToJSON) import Data.Text (Text) import GHC.Generics (Generic) data SignIn = SignIn { _signIn_email :: Text } deriving (Show, Generic) instance FromJSON SignIn instance ToJSON SignIn