#!/bin/rc
# tax(name): write out taxon id(s) and name(s)
# give part of the taxon name as argument
#  Wed Nov 24 15:25:46 EST 2004 Peter A. Cejchan <cej@gli.cas.cz | pac7@post.cz | pac@plan9.cz>

echo  awk '''$2 ~   /'$1'/  {print $1 " " $2}'''  clade  | rc 

#-eof-