Mutual recursion: Difference between revisions

Content added Content deleted
m (trivial non-edit to get the page to re-index)
m (→‎{{header|REXX}}: reduced the font size for an output section.)
Line 2,814: Line 2,814:
M: procedure; parse arg n; if n==0 then return 0; return n - F( M(n-1) )</lang>
M: procedure; parse arg n; if n==0 then return 0; return n - F( M(n-1) )</lang>
{{out|output|text=&nbsp; when using the default input of: &nbsp; &nbsp; <tt> 40 </tt>}}
{{out|output|text=&nbsp; when using the default input of: &nbsp; &nbsp; <tt> 40 </tt>}}

<pre>
Shown at three-quarter size.)
<pre style="font-size:75%">
F( 0) = 1 M( 0) = 0
F( 0) = 1 M( 0) = 0
F( 1) = 1 M( 1) = 0
F( 1) = 1 M( 1) = 0