Как получилось, что в строке ниже в правой части уравнения можно использовать символ 'fibs', хотя он еще не определен:
let fibs = 0 : 1 : zipWith (+) fibs (tail fibs)