Partition function by ush

C=101;a['~~'];i;main(k){for(;*a=printf(i%C-k?"":"p(%d)=%d\n",i%C,a[i]=k?a[i-C]+a[i%C<k?:i-k]:0)<17;)k=++i/C;}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page