haskell: add leap & sublist