A chatterbot written in Haskell, for EDAN20