RosettaCodeData/Task/Mutual-recursion/PARI-GP/mutual-recursion.parigp

3 lines
50 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
F(n)=if(n,n-M(F(n-1)),1)
M(n)=if(n,n-F(M(n-1)),0)