cat=`awkam $SRC`
ama=`awkam $OCL`

if (test $cat != "ngc" && test $cat != "ic" && test $cat != "anon")
then
NSRC=`expr $SRC - 1`
NOCL=`expr $OCL - 1`
cat=`awkam $NSRC`
ama=`awkam $NOCL`
fi

case $cat in
  ngc) cat="NGC" ;;
  ic) cat="IC" ;;
  anon) cat=" " ;;
esac

case $ama in
  mel020) ama="Alpha Per" ; echo $ama ;;
  mel022) ama="Pleiades" ; echo $ama ;;
  mel025) ama="Hyades" ; echo $ama ;;
  mel111) ama="Coma Ber" ; echo $ama ;;
       *) echo "$cat $ama" ;;
esac