diff --git a/Ledger/Types.hs b/Ledger/Types.hs
index 462f03d71..de34fdbf5 100644
--- a/Ledger/Types.hs
+++ b/Ledger/Types.hs
@@ -34,6 +34,8 @@ data Amount = Amount {
       quantity :: Double
     } deriving (Eq)
 
+type MixedAmount = [Amount]
+
 type AccountName = String
 
 data TransactionType = RegularTransaction | VirtualTransaction | BalancedVirtualTransaction