h: =proc(n,m,t)选项记忆`如果`(m=0,二项式(n+t,t),
`如果`(n=0,0,加上(h(n-1,m-j,t+1),j=1..分钟(2,m))
结束时间:
b: =proc(n,i)选项记忆`如果`(n=0,1,`如果`(i<1,0,
加(b(n-i*j,i-1)*h(g(i),j,0),j=0..n/i))
结束时间:
g: =n->`如果`(n<2,n,b(n-1$2)):
a: =n->`如果`(n=0,1,g(n)-加(g(j)*g(n-j),j=0..n/2)+
`如果`(n::偶数,(t->t*(t+1)/2)(g(n/2)),0)):