p x=x%2<1?x/2:x*3+1while 1