Mutual recursion: Difference between revisions

templates male@&{f:}

when <=0> do 0 !

<>otherwise def n: $;

$n - 1 -> male@&{f: f} -> f@&{m: male} -> $n - $ !

templates female@&{m:}

when <=0> do 1 !

<>otherwise def n: $;

$n - 1 -> female@&{m: m} -> m@&{f: female} -> $n - $ !

0..10 -> 'M$;: $->male@&{f:female}; F$;: $->female@&{m:male};