RosettaCodeData/Task/Anonymous-recursion/PARI-GP/anonymous-recursion-2.pari
2015-02-20 00:35:01 -05:00

4 lines
94 B
Text

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))
};