	read(5,*)inum,amag,dmag
	if(amag.gt.3.8.and.amag.lt.4.2.and.dmag.le.0.2)write(6,*)inum,amag,dmag
	end
