exchangealgebra-0.6.0.0: test/compile-fail/RawDerivation.hs

module RawDerivation where

import ExchangeAlgebra.IO.Input.Admission
import ExchangeAlgebra.Algebra.Base (HatBase)
import ExchangeAlgebra.Accounting.Account (AccountTitles)
import ExchangeAlgebra.Journal.Core (Journal)
import ExchangeAlgebra.Algebra.Value (MoneyDecimal)

deriveRaw :: Journal String MoneyDecimal (HatBase AccountTitles)
          -> Journal String MoneyDecimal (HatBase AccountTitles)
deriveRaw = admittedJournal