RosettaCodeData/Task/Fibonacci-sequence/Nial/fibonacci-sequence-8.nial

2 lines
68 B
Plaintext

fibm3 is op n {a:=2 2$1 1 1 0; _(0 1 pick ((n- 1) fold (a ip) a))};