2.9BSD/usr/bin/lookbib

#
set A =
switch ($1)
case -p:
	set A = "$1 $2"
	shift; shift
	breaksw

case -*:
	set A=$1
	shift
	breaksw

endsw

switch ($1)
case -p:
	set A = "$A $1 $2"
	shift; shift
	breaksw
case -*:
	set A = "$A $1"
	shift
	breaksw
endsw

if ($1 == "") then
	/usr/lib/refer/mkey -s | /usr/lib/refer/hunt $A /usr/dict/papers/Ind
else
	echo $* | /usr/lib/refer/mkey -s | /usr/lib/refer/hunt $A /usr/dict/papers/Ind
endif