ul_calc_device_type (ul_calc_device)

	status.i4.v = ul_calc_device_type()

	This routine returns the type of ul_calc_device being used by
	the calling application.

	This function returns status values as follows:

	LIBRARY_TYPE_NORMAL	running standard version of ul_calc_device
	LIBRARY_TYPE_TEST	running test version of ul_calc_device

	This function requires the following include files:

	auxlib_h, clib_h

	Related functions:

	ul_calc_device_date, ul_calc_device_tag, ul_calc_device_version_strings,
	running_current_ul_calc_device, running_test_ul_calc_device,

	C/C++ usage:

	int	status;

	status = ul_calc_device_type();