ll@N,P[99],E[],L=Factor(N,P,E),C=64,D[C][C];rrep(i,63){D[i][i]=1;rep(n,i+1,65)D[n][i]=D[n][i+1]+D[n-i][i]*(n>=i*2);}wt(mul[i,0,L](D[E[i]][1]));