mi_mode_text (ul_model)

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

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

	mode		Main Injector mode value
			(MI_8_GEV -> 8 GeV lattice,
			 MI_26_GEV -> 26 GeV lattice,
			 MI_50_GEV -> 50 GeV lattice,
			 MI_120_GEV -> 120 GeV lattice,
			 MI_150_GEV -> 150 GeV lattice)
			(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 Main Injector mode value

	This function requires the following include files:

	ul_model_h:model_config_h, acnet_errors_h

	Related functions:

	model_mi_lattice_menu, model_db_set_machine, model_db_set_machine_cpp,
	model_db_query, tev_mode_text, model_tev_lattice_menu, mdl_bpm_plot_data

	C/C++ usage:

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

	status = mi_mode_text(mode,mode_text);