sudan: function [n, x, y][
    if n = 0 -> return x + y
    if y = 0 -> return x

    sudan n-1 sudan n x y-1 y + sudan n x y-1
]

print sudan 1 3 3