Drevsh

Untitled

Feb 1st, 2012
89
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. A2)a)
  2.  
  3. mapList :: (Int -> Int) -> List -> List
  4. mapList _ [] = []
  5. mapList f (x:xs) = f x : maplist f xs
  6.  
  7. b)
  8. negateList :: List -> List
  9. neagteList mapList (x = x -1)
Advertisement
Add Comment
Please, Sign In to add comment