ll@b,@c,f[b],z=sum[a,0,b@gcd(b,a)<2](Divisor(gcd(a-1,b/c),f));wt(if[z>100,"100+",z]);