warn "td $td";
warn "a $a";