egrep '^[A-Z][a-z]' c:/zoonomen/avtax/cb2 > cb3
sed 's/ 1/ |1/' cb3|sed 's/ 2/ |2/'>cb4
awk -F "|" '{print $2,$1}' cb4|awk '{print $0,$1}'|
cut -d " " -f 2-30 |sed 's/^ //'| sed 's/^ //'|
sed '/Last/d'| sed '/H.....M 3rd/d'|  sed '/Alan P. Peterson/d'|sort -d|
uniq|sed 's/  [ ]*/ /' > c:/zoonomen/avtax/cb5