Natürliche Zahlen in Haskell

nats = 0 : map (1+) nats
take 5 nats = [0,1,2,3,4]