#! /bin/csh -f
# $Header: snip,v 1.2 96/01/04 18:22:51 k2mm Exp $

set c = `echo $1 | tr A-Z a-z`
set d = `grep "^$c	" lnames`
set call = `echo $d[1] | tr a-z A-Z`
set name = $d[2]

sed					\
    -e 's=^> *=='			\
    -e '2 s=^\[[^]]*\] *=='		\
    -e "2 s=^ *=[$name/$call]--="	\
| wrap +1				\
| sed					\
    -e '2 s=]--=]  ='			\