add two small haskell demo