CHEM=$BDA/descri

case $# in
0) (cat $ENT/type.ent ; zex $CHEM/t.doc) | page ;;
1) cat $ENT/type.ent ; zex $CHEM/t.doc | grep $1 ;;
esac
echo ' '