m={}
A.sb{|a|v a./.l}.e{|z|c,d=z./.m{|i|m[i]||[i]}
s'FT'[d<=>(c|=d).e{|i|m[i]=c}]+' '+z}