5 lines
54 B
Text
5 lines
54 B
Text
|
f[0]:=1
|
||
|
|
m[0]:=0
|
||
|
|
f[n_]:=n-m[f[n-1]]
|
||
|
|
m[n_]:=n-f[m[n-1]]
|