LaTeX-examples/documents/Programmierparadigmen/scripts/haskell/fibonacci-akk.hs

mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-26 06:48:04 +02:00
fibAkk n n1 n2
    | (n == 0)  = n1
    | (n == 1)  = n2
    | otherwise = fibAkk (n - 1) n2 (n1 + n2)
fib n = fibAkk n 0 1
Viel zu Haskell ergänzt; Funktionen höherer Ordnung beschrieben 2014-02-04 14:07:24 +01:00			`fibAkk n n1 n2`
Tippfehler korrigiert; Beispiele hinzugefügt 2014-03-16 19:00:22 +01:00			`\| (n == 0) = n1`
			`\| (n == 1) = n2`
Viel zu Haskell ergänzt; Funktionen höherer Ordnung beschrieben 2014-02-04 14:07:24 +01:00			`\| otherwise = fibAkk (n - 1) n2 (n1 + n2)`
			`fib n = fibAkk n 0 1`