Rosetta Code

Mutual recursion: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Dedalus (talk | contribs)
255 edits
Line 922:
=={{header|Elena}}==
{{trans|Smalltalk}}
ELENA 3.4.x :
<lang elena>import extensions.;
import system'collections.;
F = (:n)( => (n == 0) if:[^? 1] else:[ ^(n - (M(F(n-1))) ] ).;
M = (:n)( => (n == 0) if:[^? 0] else:[ ^(n - (F(M(n-1))) ] ).;
public program()
{
[
var ra := ArrayList new. ArrayList();
var rb := ArrayList new. ArrayList();
0for(int i to:= 0, i <= 19, do(:i += 1)
[{
ra .append(F(i)).;
rb .append(M(i)).
].};
console .printLine(ra).asEnumerable());
console .printLine(rb).asEnumerable())
]}</lang>
{{out}}
<pre>
Retrieved from "https://rosettacode.org/wiki/Mutual_recursion"