An asset trading system written in Haskell