C+
C NAME:
C	get_compiler
C CALLING SEQUENCE:
	subroutine get_compiler(f77id)
C-
	character	f77id*(*)
	f77id = '_i686_Linux_intel_9.1'
	return
	end
