{-# LANGUAGE DeriveGeneric #-}

module Model.Json.PaymentId
  ( PaymentId(..)
  ) where

import Data.Aeson
import GHC.Generics

import qualified Model.Database as D

data PaymentId = PaymentId
  { id :: D.PaymentId
  } deriving (Show, Generic)

instance FromJSON PaymentId
instance ToJSON PaymentId