sum(mod(i,p)>0or dispterms(i)>p:mod(p,6)+2,i,p:3,999);