RosettaCodeData/Task/Mutual-recursion/AutoHotkey/mutual-recursion-1.ahk
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

11 lines
179 B
AutoHotkey

Loop 20
i := A_Index-1, t .= "`n" i "`t " M(i) "`t " F(i)
MsgBox x`tmale`tfemale`n%t%
F(n) {
Return n ? n - M(F(n-1)) : 1
}
M(n) {
Return n ? n - F(M(n-1)) : 0
}