Ledger.Amount

An Amount is some quantity of money, shares, or anything else.

A simple amount is a Commodity, quantity pair:

  $1 
  -50
  EUR 3.44 
  GOOG 500
  1.5h
  90 apples
  0 

An amount may also have a per-unit price, or conversion rate, in terms of some other commodity. If present, this is displayed after @:

  EUR 3 @ $1.35

A MixedAmount is zero or more simple amounts. Mixed amounts are usually normalised so that there is no more than one amount in each commodity, and no zero amounts (or, there is just a single zero amount and no others.):

  $50 + EUR 3
  16h + $13.55 + AAPL 500 + 6 oranges
  0

We can do limited arithmetic with simple or mixed amounts: either price-preserving arithmetic with similarly-priced amounts, or price-discarding arithmetic which ignores and discards prices.

Documentation

amountop :: (Double -> Double -> Double) -> Amount -> Amount -> Amount

Apply a binary arithmetic operator to two amounts, converting to the second one's commodity (and display precision), discarding any price information. (Using the second commodity is best since sum and other folds start with a no-commodity amount.)

convertAmountTo :: Commodity -> Amount -> Amount

Convert an amount to the specified commodity using the appropriate exchange rate (which is currently always 1).

convertMixedAmountTo :: Commodity -> MixedAmount -> Amount

Convert mixed amount to the specified commodity

costOfAmount :: Amount -> Amount

Convert an amount to the commodity of its saved price, if any.

showAmount :: Amount -> String

Get the string representation of an amount, based on its commodity's display settings.

showAmountDebug :: Amount -> String

Get the unambiguous string representation of an amount, for debugging.

showAmountWithoutPrice :: Amount -> String

Get the string representation of an amount, without any @ price.

showAmount' :: Amount -> String

Get the string representation (of the number part of) of an amount

punctuatethousands :: String -> String

Add thousands-separating commas to a decimal number string

isZeroAmount :: Amount -> Bool

Does this amount appear to be zero when displayed with its given precision ?

isReallyZeroAmount :: Amount -> Bool

Is this amount really zero, regardless of the display precision ? Since we are using floating point, for now just test to some high precision.

amounts :: MixedAmount -> [Amount]

Access a mixed amount's components.

isZeroMixedAmount :: MixedAmount -> Bool

Does this mixed amount appear to be zero - empty, or containing only simple amounts which appear to be zero ?

isReallyZeroMixedAmount :: MixedAmount -> Bool

Is this mixed amount really zero ? See isReallyZeroAmount.

isReallyZeroMixedAmountCost :: MixedAmount -> Bool

Is this mixed amount really zero, after converting to cost commodities where possible ?

mixedAmountEquals :: MixedAmount -> MixedAmount -> Bool

MixedAmount derives Eq in Types.hs, but that doesn't know that we want $0 = EUR0 = 0. Yet we don't want to drag all this code in there. When zero equality is important, use this, for now; should be used everywhere.

showMixedAmount :: MixedAmount -> String

Get the string representation of a mixed amount, showing each of its component amounts. NB a mixed amount can have an empty amounts list in which case it shows as "".

showMixedAmountDebug :: MixedAmount -> String

Get an unambiguous string representation of a mixed amount for debugging.

showMixedAmountWithoutPrice :: MixedAmount -> String

Get the string representation of a mixed amount, but without any @ prices.

showMixedAmountOrZero :: MixedAmount -> String

Get the string representation of a mixed amount, and if it appears to be all zero just show a bare 0, ledger-style.

showMixedAmountOrZeroWithoutPrice :: MixedAmount -> String

Get the string representation of a mixed amount, or a bare 0, without any @ prices.

normaliseMixedAmount :: MixedAmount -> MixedAmount

Simplify a mixed amount by combining any component amounts which have the same commodity and the same price. Also removes zero amounts, or adds a single zero amount if there are no amounts at all.

normaliseMixedAmountIgnoringPrice :: MixedAmount -> MixedAmount

Simplify a mixed amount by combining any component amounts which have the same commodity, ignoring and discarding their unit prices if any. Also removes zero amounts, or adds a single zero amount if there are no amounts at all.

sumMixedAmountsPreservingHighestPrecision :: [MixedAmount] -> MixedAmount

normaliseMixedAmountPreservingHighestPrecision :: MixedAmount -> MixedAmount

sumAmountsPreservingHighestPrecision :: [Amount] -> Amount

amountopPreservingHighestPrecision :: (Double -> Double -> Double) -> Amount -> Amount -> Amount

costOfMixedAmount :: MixedAmount -> MixedAmount

Convert a mixed amount's component amounts to the commodity of their saved price, if any.

nullamt :: Amount

The empty simple amount.

nullmixedamt :: MixedAmount

The empty mixed amount.

missingamt :: MixedAmount

A temporary value for parsed transactions which had no amount specified.