8 lines
137 B
Text
8 lines
137 B
Text
/* fib(n) is built-in; here is an implementation */
|
|
fib2(n) := (matrix([0, 1], [1, 1])^^n)[1, 2]$
|
|
|
|
fib2(100)-fib(100);
|
|
0
|
|
|
|
fib2(-10);
|
|
-55
|