Haskell code - 3 lines

Link:

Haskell, pasted on Nov 24:

1
2
3

main = putStrLn "Hello World"

fibs = 0:1:[x+y|(x,y) <- zip fibs (tail fibs)]

Output:

1	Hello World