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

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