Simple program to keep track of shows with haskell and acid-state