n++{for(;$++i;)if(650-n*NF<s=a[i]=$i a[i])print s"."}i=FS=_