Added farmer, wolf, goat, cabbage puzzle solution in Haskell