photo gallery in Haskell