Mutual recursion: Difference between revisions

→‎TI-89 BASIC: new example
(→‎TI-89 BASIC: new example)
Line 896:
}
puts ""</lang>
 
=={{header|TI-89 BASIC}}==
 
<pre style="font-family:'TI Uni'">Define F(n) = when(n=0, 1, n - M(F(n - 1)))
Define M(n) = when(n=0, 0, n - F(M(n - 1)))
</pre>
 
=={{header|UNIX Shell}}==