writing haskell section - yay