integer lpos, lout
	character filelist*8192, outlist*8192

	common/dat_utils_com/lpos, lout, filelist, outlist