[ error "foo" , 42 ] !! 0 [ error "foo" , 42 ] !! 1 length [ error "foo" , 42 ] let xs = "bar" : xs take 5 xs
fib :: [ Integer ] fib = 0 : 1 : zipWith (+) fib ( tail fib )
let merge (x:xs) ys = x : merge ys xs let updown = 0 : 1 : updown let paper = merge updown paper take 15 papervgl. http://mathworld.wolfram.com/DragonCurve.html