Mutual recursion: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) 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= when using the default input of: <tt> 40 </tt>}} |
{{out|output|text= when using the default input of: <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 |