ll@N,P[99],E[],L=Factor(N,P,E),C=64,D[C][C]{{1}},t[C][65];rep(C){rep[t,s](u,C){*u=0;rep(d,C)u[d+1]=u[d]+D[s][d];}rep(s,C)rep(d,C)D[s][d]=t[s-d][d+1];}wt(mul[i,0,L](t[E[i]][C]));