RosettaCodeData/Task/Fibonacci-sequence/AntLang/fibonacci-sequence.antlang

5 lines
72 B
Plaintext

/Sequence
fib:{<0;1> {x,<x[-1]+x[-2]>}/ range[x]}
/nth
fibn:{fib[x][x]}