case $# in
0) typ="ubv" ;;
1) typ=$1 ;;
esac
FS=`nof $typ` 

case $1 in
gen|prm|orb|wal|bdp|magv) (cat $ENT/$typ.ent ; zex $FS)| page ;;
*) (cat $ENT/$typ.ent ; zex $FS)| ind | page ;;
esac
echo ' '
