Mutual recursion: Difference between revisions

added MiniZinc
(Mutual recursion in BASIC256)
(added MiniZinc)
Line 2,552:
<pre>8
7</pre>
 
=={{header|MiniZinc}}==
<lang MiniZinc>
function var int: F(var int:n) =
if n == 0 then
1
else
n - M(F(n - 1))
endif;
function var int: M(var int:n) =
if (n == 0) then
0
else
n - F(M(n - 1))
endif;
</lang>
 
=={{header|MMIX}}==
Anonymous user