added simple haskell solution to a travel problem