i=$0;{for(;1<i;)print i=i%2?i*3+1:i/2}