RosettaCodeData/Task/Mutual-recursion/TI-89-BASIC/mutual-recursion.ti-89

3 lines
88 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
Define F(n) = when(n=0, 1, n - M(F(n - 1)))
Define M(n) = when(n=0, 0, n - F(M(n - 1)))