f=u[a]?a=u[a],f:a while read a b c[y=f,a=b,y-f?u[y]=a,0:1] do : done echo $c