RosettaCodeData/Task/Mutual-recursion/PARI-GP/mutual-recursion.pari
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

2 lines
50 B
Text

F(n)=if(n,n-M(F(n-1)),1)
M(n)=if(n,n-F(M(n-1)),0)