for(a=F;a;)4^a--*++b
a