module Fibonacci import StdEnv, EersteOfLaatste N = 46 // 1. fibonacci :: Int -> Int fibonacci ... Start = [fibonacci i \\ i <- [1 .. N]] // 2. // Recursieve definitie: somLijsten :: // meest algemene type somLijsten ... // 3. Start = eersten N fibs where fibs = [1,1 : somLijsten fibs (tl fibs)]