This comment is reply for 4572 matyr: (自然数の分割). Go to thread root.
matyr #4597(2007/12/03 23:34 GMT) [ xtal ] Rating1/1=1.00
1 2 3 4 5 6
(|n, m|{ c: callee; m--; return fiber{ if(m < 1) yield [n]; else (n + 1).times{|x| c(x, m){ yield [n - x] ~ it; } } } })(5, 3).join("\n").p;
Rating1/1=1.00-0+
[ reply ]
matyr
#4597()
[
xtal
]
Rating1/1=1.00
(|n, m|{ c: callee; m--; return fiber{ if(m < 1) yield [n]; else (n + 1).times{|x| c(x, m){ yield [n - x] ~ it; } } } })(5, 3).join("\n").p;Rating1/1=1.00-0+