2.9BSD/usr/src/lib/libU77/test/systst.f

	program systst
	integer system
	write(*,*) "date", system("date")
	write(*,*) "rm xxx", system("rm xxx")
	end