Anamorphisms example in Haskell

example.hs

--Import Data.List so that we can use the unfoldr function. 
import Data.List
--p and g are combined into one function which you input to unfoldr in Haskell:
example = unfoldr (\x -> if x > 9 then Nothing else Just (x, x+1))
--Print out results of (example 7) and (example 0).
main = do
  print (example 7)
  print (example 0)

See my blog post for further explanation.