tev_mode_text (ul_model)

	status.i4.v = tev_mode_text(mode.i4.v, mode_text.i1a.r)

	This routine returns text associated with a Tevatron 'mode'.
	The mode constants are in ul_model:model_config. 

	mode		Tevatron mode value
			(TEV01,
			 TEV02,
			 TEV03,
			 TEV04,
			 TEV05,
			 TEV06,
			 TEV07,
			 TEV08,
			 TEV09,
			 TEV10,
			 TEV11,
			 TEV12,
			 TEV13,
			 TEV14,
			 TEV15,
			 TEV16)
			(constants are in 'ul_model:model_config')
	mode_text	returned text that describes the mode;
   			(allow LEN_MODE_TEXT characters) 

	This function returns ACNET status values as follows:

	OK			success
	CBS_INVARG		invalid Tevatron mode value

	This function requires the following include files:

	ul_model_h:model_config_h, acnet_errors_h

	Related functions:

	model_tev_lattice_menu, model_db_set_machine, model_db_set_machine_cpp,
	model_db_query, mi_mode_text, model_mi_lattice_menu, mdl_bpm_plot_data

	C/C++ usage:

	char	mode_text[LEN_MODE_TEXT];
	int	status;
	int	mode = TEV01;

	status = tev_mode_text(mode,mode_text);