for(;scale=i++-100;){for(k=n=1;i-k;)k/=A||k=n+=n;n}