A basic stack implemented in Haskell with pop, push, and peek functionalities.