RosettaCodeData/Task/Anonymous-recursion/PARI-GP/anonymous-recursion-2.parigp
2023-07-01 13:44:08 -04: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))
};