# Ngraph initialization script
new menu
system:0:login_shell=menu:0:menu
#
if [ -f "${NGRAPHHOME}/_Ngraph.ngp" ]; then
	. "${NGRAPHHOME}/_Ngraph.ngp"
elif [ -f "${NGRAPHLIB}/_Ngraph.ngp" ]; then
	. "${NGRAPHLIB}/_Ngraph.ngp"
fi
#
if [ "$*" ]; then
	case "$*" in
	-g*)
		for i in `derive -instance draw`
		do
			del ${i}:0-!
		done
		if [ `exist gra:viewer` != 0 ]
		then
			del gra:viewer
		fi
		. $2
		new gra2null name=DUMMY
		new gra device=gra2null:DUMMY
		gra::open
		new gra2file name=OUTPUT
		gra2file::file="$3"
		gra:viewer:device=gra2file:OUTPUT
		gra:viewer:open
		gra:viewer:draw
		gra:viewer:close
		del system:0
	;;
	*.prm|*.PRM|*.ngp|*.NGP)
		system:0:login_shell="menu:0:menu $*"
	;;
	*.gra|*.GRA)
		for i in `derive -instance draw`
		do
			del $i:0-!
		done
        	new merge file:"$*"
	;;
	*)
		new file file:"$*"
	;;
	esac
fi
