aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Task/Mutual-recursion/Mathematica/mutual-recursion-1.math Normal file
View file

@ -0,0 +1,4 @@
f[0]:=1
m[0]:=0
f[n_]:=n-m[f[n-1]]
m[n_]:=n-f[m[n-1]]

4
Task/Mutual-recursion/Mathematica/mutual-recursion-2.math Normal file
View file

@ -0,0 +1,4 @@
f[0]:=1
m[0]:=0
f[n_]:=f[n]=n-m[f[n-1]]
m[n_]:=m[n]=n-f[m[n-1]]

2
Task/Mutual-recursion/Mathematica/mutual-recursion-3.math Normal file
View file

@ -0,0 +1,2 @@
m /@ Range[30]
f /@ Range[30]

2
Task/Mutual-recursion/Mathematica/mutual-recursion-4.math Normal file
View file

@ -0,0 +1,2 @@
{0,1,2,2,3,4,4,5,6,6,7,7,8,9,9,10,11,11,12,12,13,14,14,15,16,16,17,17,18,19}
{1,2,2,3,3,4,5,5,6,6,7,8,8,9,9,10,11,11,12,13,13,14,14,15,16,16,17,17,18,19}