Database for Rabbit shelter in Haskell