pro setup_cips_tools_vars, main_dir, version=version

	COMMON CIPS_VARS, cips_vars_set
	if n_elements(cips_vars_set) ne 0 then return
	cips_vars_set = 1
	
	; While much of this is useful for offline processing, it can be detrimental
	;  to the routine daily processing.
	;
	hostname = STRLOWCASE(strtrim(getenv('HOSTNAME'), 2))
	if !version.os ne "Win32" then begin
	  spawn, 'whoami', user
	  user = STRLOWCASE(strtrim(user, 2))
	endif else user = ''
	; DO NOT execute the rest of this file in a production environment!
	if (user eq 'aimpro') && (hostname eq 'aimcips-gpu') then return
	
	pathsep = path_sep()
	IF KEYWORD_SET( version ) THEN BEGIN
		DEFSYSV, '!SDS_ROOT', file_dirname(FILE_DIRNAME((ROUTINE_INFO('setup_cips_tools_vars', /SOURCE)).path))
		DEFSYSV, '!COMMON_ROOT', !SDS_ROOT + pathsep + 'common'
		DEFSYSV, '!7Z_PATH', !COMMON_ROOT + pathsep + 'pack' + pathsep + '7za432'
		DEFSYSV, '!COMMON_INPUT_DATA', !COMMON_ROOT + pathsep + 'input_data'
		DEFSYSV, '!TLE_PATH', !COMMON_INPUT_DATA + pathsep + 'tle'
		DEFSYSV, '!DATETIME_PATH', !COMMON_ROOT + pathsep + 'datetime'
		DEFSYSV, '!CIPS_ROOT', !SDS_ROOT + pathsep + 'cips'
		DEFSYSV, '!COMMON_INPUT_DATA', !COMMON_ROOT + pathsep + 'input_data'
		DEFSYSV, '!CIPS_TEMP', !CIPS_ROOT + pathsep + 'temp'
		DEFSYSV, '!DATA_PRODUCT_PATH', main_dir + pathsep+ 'data' + pathsep + 'cips' + pathsep + version + pathsep
		DEFSYSV, '!USER_DATA_PATH', main_dir + pathsep + 'user_data'
		DEFSYSV, '!CAL_DIAGNOSTICS_PATH', !DATA_PRODUCT_PATH + pathsep + 'cal_diagnostics'
		
	ENDIF ELSE BEGIN
		DEFSYSV, '!SDS_ROOT', file_dirname(FILE_DIRNAME((ROUTINE_INFO('setup_cips_tools_vars', /SOURCE)).path))
		DEFSYSV, '!COMMON_ROOT', !SDS_ROOT + pathsep + 'common'
		DEFSYSV, '!7Z_PATH', !COMMON_ROOT + pathsep + 'pack' + pathsep + '7za432'
		DEFSYSV, '!COMMON_INPUT_DATA', !COMMON_ROOT + pathsep + 'input_data'
		DEFSYSV, '!TLE_PATH', !COMMON_INPUT_DATA + pathsep + 'tle'
		DEFSYSV, '!DATETIME_PATH', !COMMON_ROOT + pathsep + 'datetime'
		DEFSYSV, '!CIPS_ROOT', !SDS_ROOT + pathsep + 'cips'
		DEFSYSV, '!COMMON_INPUT_DATA', !COMMON_ROOT + pathsep + 'input_data'
		DEFSYSV, '!CIPS_TEMP', !CIPS_ROOT + pathsep + 'temp'
		DEFSYSV, '!DATA_PRODUCT_PATH', main_dir + pathsep+ 'data' + pathsep + 'cips' + pathsep + 'v3.20' + pathsep
		DEFSYSV, '!USER_DATA_PATH', main_dir + pathsep + 'user_data'
		DEFSYSV, '!CAL_DIAGNOSTICS_PATH', !DATA_PRODUCT_PATH + pathsep + 'cal_diagnostics'
		
	ENDELSE
	
end