Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
newtype MoneyBag -- A Money Bag is a wrapper around
= MoneyBag (Map Currency Amount) -- * A map from currency to amount
deriving (Show, Eq) -- Equality is automatically generated
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment