1 files changed, 5 insertions, 5 deletions

diff --git a/app/Data/Ledger.hs b/app/Data/Ledger.hs
index 53901cb..4aa5137 100644
--- a/app/Data/Ledger.hs
+++ b/app/Data/Ledger.hs
@@ -94,8 +94,8 @@ data Account = Account
 -- cleared and the balance of the account agrees with the amount in the
 -- assertion.
 data BalAssert = BalAssert
-  { account :: Account,
-    amount :: Integer,
+  { account :: AccountId,
+    amount :: Money,
     labels :: Labels
   }
 
@@ -108,8 +108,8 @@ data Tx = Tx
   }
   deriving (Show, Generic)
 
-data SeqTx = SeqTx [Integer] Tx
+-- data SeqTx = SeqTx [Integer] Tx
 
-data LedgerEntry = TxEntry SeqTx | BalAssertEntry BalAssert
+data Entry = TxEntry Tx | BalAssertEntry BalAssert
 
-data Ledger = Ledger [LedgerEntry]
+data Ledger = Ledger [Entry]