19 lines
357 B
Haskell
19 lines
357 B
Haskell
{-# LANGUAGE DeriveGeneric #-}
|
|
{-# LANGUAGE MultiParamTypeClasses #-}
|
|
|
|
module Types.Journal where
|
|
|
|
import Servant.API
|
|
import Servant.HTML.Blaze
|
|
import Web.Internal.FormUrlEncoded
|
|
|
|
import GHC.Generics
|
|
|
|
newtype CashCheck = CashCheck
|
|
{ cashCheckAmount :: Float
|
|
}
|
|
deriving (Show, Generic)
|
|
|
|
instance MimeUnrender HTML CashCheck
|
|
instance FromForm CashCheck
|