ll@a,@b,D[2d3];*D+=D[1..Divisor(a,D+1)]%b<1;wt(*D);