;
set i = (nextlm("att"," "))
while ($i s! " ")
   if ($i s! "LARGEST") then
     set l = (head(tail(tail(tail($att[$i])))))
     if ($l s! "unk") show_att $i
   endif
   set  i = (nextlm("att",$i))
endwhile
