HQu-0.0.0.0: src/Q/Currencies/America.hs

module Q.Currencies.America
  (
    module Q.Currencies.America
  )
where

import           Q.Currency

-- | Canadian dollar
cad :: Currency
cad = Currency {
    cName           = "Canadian dollar"
  , cCode           = "CAD"
  , cIsoCode        = 124
  , cFracsPerUnit   = 100
}

-- | U.S. dollar
usd :: Currency
usd = Currency {
    cName           = "U.S. dollar"
  , cCode           = "USD"
  , cIsoCode        = 840
  , cFracsPerUnit   = 100
}