fun F ← <int n|when(n æ 0, 1, n - M(F(n - 1)))
fun M ← <int n|when(n æ 0, 0, n - F(M(n - 1)))
write("F: ")
range(0, 21).list(<int n|write(F(n) + ", "))
writeLine("...")
write("M: ")
range(0, 21).list(<int n|write(M(n) + ", "))