files/practicum/Fibonacci.icl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

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)]