(defn sumdown [sum x]
(
if (foo x)
(do
(recur (+ sum x) (dec x))
)
else do(
(recur (+ sum x) (dec x))
)
)
)
KGRlZm4gc3VtZG93biBbc3VtIHhdCiAgICAoCiAgICBpZiAoZm9vIHgpIAogICAgIChkbwogICAgIChyZWN1ciAoKyBzdW0geCkgKGRlYyB4KSkKICAgICApCiAgICAgZWxzZSBkbygKICAgICAgICAocmVjdXIgKCsgc3VtIHgpIChkZWMgeCkpCiAgICAgKQoKICAgICApCikg