RosettaCodeData/Task/Anonymous-recursion/PARI-GP/anonymous-recursion-2.pari

5 lines
94 B
Text
Raw Permalink Normal View History

2015-02-20 00:35:01 -05:00
Fib(n)={
my(F=k->my(f=self());if(k<2,k,f(k-1)+f(k-2)));
if(n<0,(-1)^(n+1),1)*F(abs(n))
};