Changes between Version 4 and Version 5 of ViewPatternsNew

Timestamp:

07/18/07 09:27:54 (6 years ago)

Author:

danl

Comment:

add unfoldr

ViewPatternsNew

@@ -236 +236 @@
    foldr f z [] = z
    foldr f z (x : foldr f z -> xs) =  x `f` xs
+
+   unfoldr :: (b -> Maybe (a, b)) -> b -> [a] 
+   unfoldr f (f -> Just (a, b)) = a : unfoldr f b
+   unfoldr f other         = []
 }}}