module Penny.Lincoln.Bits.Entry where

import Penny.Lincoln.Bits.Amount (Amount)
import Penny.Lincoln.Bits.DrCr (DrCr)

data Entry = Entry { drCr :: DrCr
                   , amount :: Amount }
             deriving (Eq, Show, Ord)