A simple database written by Haskell