test -s ~/.alias && . ~/.alias

export ul=/usr/local
export ulb=$ul/bin
export ulc=$ul/src
export ull=$ul/lib
export ml=/math/local
export mlb=$ml/bin
export mls=$ml/solaris
export mlsb=$mls/bin
export mlc=$ml/src
export mld=$ml/doc
export mll=$ml/lib
export mlmi=$ml/mathinfo

# regular aliases and functions
alias back='cd -'
alias bping='ping -s 24 -c 3'
alias cln='rm -i [0-z]*~ .[0-9A-Za-z]*~'
alias cls=clear
alias clw='xcho -n "#E[7m #N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#N#n#n#n"'
function colsum
  { awk "BEGIN{s=0}{s=s+\$$1}END{print s}" ; }
alias crlf='conv -m /usr/local/aux/cnvtab/TAB.crlf'
alias del='rm -i'
function diffo { diff  "${1}~"  "$1" ; }
function diffow { diff -w  "${1}~"  "$1" ; }
function diffs { diff  "${2}${1}"  "$2" ; }
function doc { less -EX "/usr/local/DTxt/${1}.txt" ; }
alias dvipsl='dvips -l1'
alias EVAL=eval
alias dir='ls -alsqF'
#alias dirt='ls -alsqtF | /usr/bin/head'
# the "dirt" alias is now in /etc/bashrc.bashrc.local
# unalias dirt
function dirt { if [ "$#" -gt 0 ] ; then ls -alsqtF "$@" | head -30 ;
                else ls -alsqtF | head -30 ; fi ; }
alias dr='ls -aqF'
alias dra='ls -aqFR'
function drdr { if [ "$#" -gt 0 ]; then ls -aqF "$@" | grep -e '/$' | fwid 77;
                else ls -aqF | grep -e '/$' | fwid 77; fi ; }
function drw { if [ "$#" -gt 0 ]; then ls -aqF "$@" | fwid 78;
                else ls -aqF | fwid 78; fi; } 
alias em='emacs -nw'
function fig { echo "" | awk "END{print $*}" ; }
function finc { find . -name \*${1}\* -print ; }
function fincl { find . -name \*${1}\* -ls ; }
alias j=jobs
alias lo=exit
alias mdr=mkdir
# alias more='less -EX'
function mtil { mv -i "$1" "${1}~" ; }
alias ren='mv -i'
alias rename='mv -i'
alias rehash='hash -r'
alias rwd='pwd -P'
alias srcu='source ~/.bashrc'
alias stcr='conv -m /usr/local/aux/cnvtab/TAB.stcr'
alias t=date
function setenv { if [ $# -eq 0 ]; then env;
                  elif [ $# -eq 2 ]; then export "${1}=${2}";
                  else echo "setenv: Two args or none"; fi; }
function tgsum { gzcat "$1" | tar tvf - | colsum 3 ; }
function treel
 { if [ "$#" = "1" ] ; then treelarg="$1" ; else treelarg="." ; fi;
   ls -alR "$treelarg" | grep -e "^[l-]" ; }
function treesum
 { if [ "$#" = "1" ] ; then treesumarg="$1" ; else treesumarg="." ; fi;
   ls -alR "$treesumarg" | grep -e "^[l-]" | colsum 5 ; } 
function treesumx { ls -alR "$1" | grep -e "^[l-]" | colsum 5 ; } 
alias \
  treesumy='ls -alR | grep -e "^[l-]" | awk "BEGIN{s=0}{s=s+\$5}END{print s}"'
function umtil { mv -i "${1}~" "${1}" ; }
alias where=type
alias up='cd ..'
alias psaf='ps -Af | sed -e "s/^........................................//"'

PS1="\$? \W> "