added Kirk's Quest The Descent in Haskell