Some haskell code that makes me cry:

--Good ol' quicksort
quicksort [] =[]
quicksort(x:xs) =  quicksort[ y | y <- xs, y < x]
                ++ [x]
                ++ quicksort[ y | y <- xs, y >= x]

--The list of the Fibonacci numbers
fib = 1 : 1 : [a+b| (a,b) <- zip fib (tail fib)]

Holy. Crap. Too bad I had to get a masters in CS to understand what the hell is going on here.

: /