module Hcompta.Model.Account
 ( module Hcompta.Model.Account
 , module Name
 ) where

import qualified Hcompta.Model.Amount       as Amount
import qualified Hcompta.Model.Account.Name as Name
import qualified Hcompta.Model.Tag          as Tag

type Name = Name.T

data T
 = T
 { name :: Name
 , ebalance :: Amount.Mixed
 , children :: [T]
 , numpostings :: Int
 , tags :: [Tag.T]
 , ibalance :: Amount.Mixed
 , parent :: Maybe T
 , boring :: Bool
 }