TY=$1
typ $TY
shift
FS=`nof $TY`

cat $ENT/$TY.ent 

for i in $*
do
case $TY in
ubv|pg|ccd|sit)
   zex $FS | grep $i | tee $REF | awkmubv 
   echo ' ' ;;
irv)
   zex $FS | grep $i | tee $REF 
   echo ' ' 
   zex vrad.mrv | grep $i | awkmrv 
   echo ' ' ;;
*)
   zex $FS | grep $i | tee $REF
   echo ' ' ; zex $TY.moy | grep $i
   echo ' ' ;;
esac
done
 
multiref