program flid
	external f77lid
	end