RosettaCodeData/Task/Fibonacci-sequence/K/fibonacci-sequence-2.k

2 lines
64 B
Plaintext

{c::.();{v:c[a:`$$x];:[x<3;1;:[_n~v;c[a]:_f[x-1]+_f[x-2];v]]}x}