Added initial schema definition in Haskell, plus a simple query function.