*! version SWS3/stb-2:gr3/stb-12:gr3.1  gr3 utility
program define _3ddflts
	version 2.1
	if "%D3rot"=="" { mac def D3rot 45 } 	/* try 30 */
	if "%D3elev"=="" { mac def D3elev 45 }  /* try 60 */
	if "%D3tilt"=="" { mac def D3tilt 0 } 
	if "%D3axis"=="" { mac def D3axis "tbl" }
	if "%D3shad"=="" { mac def D3shad "off" }
end
exit
/*
	_3ddflts

	Takes no arguments.  
	Sets the default if they are undefined.
	Defaults are:
		D3rot	default rotation angle
		D3elev	default elevation angle
		D3tilt	default tilt angle (frozen at 0)
		D3axis	default axis
		D3shad	off
*/