((rfn f `n(or(> 0 --.n)(on i"123"(f(+"   "(prn:+ . `i)".")n))))""(read))