read a i j for((;a-1;j|=++i,a=a&1?a*3+1:a/2)){ ${a:?};} echo $[j-i] . *