x=0
oo{p x=+[x+1,x/2,x*x][$<.g/5%8]}