RosettaCodeData/Task/Fibonacci-sequence/ANT/fibonacci-sequence.ant

5 lines
72 B
XML

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