: push/pop current working directory

case ##
in
	0)
		case -$DIRind
		in
			-|-0)
				echo bottom of stack 1>&2
				exit 1
				;;
			*)
				DIRind=`expr $DIRind - 1`
				cd `eval echo "$"DIR$DIRind`
				;;
		esac
		;;
	*)
		case -$DIRind
		in
			-)
				DIRind=0
				;;
		esac
		eval DIR$DIRind=`pwd`
		cd #1
		DIRind=`expr $DIRind + 1`
		;;
esac
